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Aktuell 



Steuerprobleme? 

Um eine Steuerung oder Re¬ 
gelung zu automatisieren, reicht 
in sehr vielen Fällen ein kleiner 
Computer, Schon die Hardware 
eines VC20-Grundmodells wür¬ 
de in vielen Fällen ausreichen, 
ein Commodore 64 wäre häufig 
gar nicht ausgelastet. Der gute 
alte 2001, in englischsprachigen 
Ländern »Pet« genannt, hinkte in 
puncto Leistung hinter den heu¬ 
tigen Heimcomputern deutlich 
her — wurde aber von vielen 
Technikern für Steuer- und Re¬ 
gelaufgaben eingesetzt. Man¬ 
che dieser Systeme tun heute 
noch ihren Dienst. 

Die Zahl der Anwendungen 
auf diesem Gebiet hat aller¬ 
dings lange nicht so stark zuge¬ 
nommen, wie die Zahl der klei¬ 
nen und kleinsten Computer. 
Das mag zu einem Teil daran lie¬ 
gen, daß es hier kaum vernünfti¬ 
ge Bausätze gibt — und daß an¬ 
dererseits auch passionierte 
Bastler schnell auf Beschaf¬ 
fungsschwierigkeiten stoßen, 
wenn sie bestimmte Teile oder 
Baugruppen für die Realisie¬ 
rung der einen oder anderen 
Idee suchen: Wer sich mit Pro¬ 
grammierung oder Elektronik 
auskennt, weiß nicht ohne weite¬ 
res, wo man welche Pumpe kau¬ 
fen kann, um etwa das Blumen¬ 
gießen zu automatisieren. 

Vorläufig war wohl noch ein 
ganz anderer Punkt hinderlich: 
Wer einen Computer hat, will ihn 
ja in der Regel für verschiedene 
Zwecke einsetzen und nicht nur 
zur Erledigung einer Aufgabe. 
Wenn der Computer aber bei¬ 
spielsweise die Heizung steuern 
soll, dann kann er für nichts an¬ 
deres verwendet werden. Je 
mehr Benutzer im Laufe der Zeit 
jedoch »aufsteigen«, desto häufi¬ 
ger werden preisgünstige ge¬ 
brauchte VC 20 zu haben sein, 
die der Commodore 64-Besitzer 
dann als Zweitgerät für einen 
speziellen Zweck reservieren 
kann. Damit wäre kein Problem 
den »Kleinen« auf Dauer als Zen¬ 
trale einer Alarmanlage oder 
...oder...abstellen. Vielleicht be¬ 
kommen damit auch die Steuer- 
und Regel-Anwendungen etwas 
Auftrieb. 

Michael Pauly, Chefredakteur 





Die Geschäfte hatten noch 


Datenübertragung p 
Tagesordnung, in Deuts 
Ein Kaufhaus in München d 
zwischen einem Apple und eine 


tr waren 
schon 
recht früh am 
Ort des Geschehens. 


‘TKadctK-Skocv 


nicht lange geöffnet, den¬ 
noch herrschte bereits reger 
Betrieb. Unser Weg führte zu 
einem Kaufhaus am Stachus, 
einem bekannten Platz in der 
Münchener Innenstadt, und 
dort direkt in die Computer¬ 
abteilung. 

Vorbei an Farbe sprühen¬ 
den Monitoren, die mit klei¬ 
nen und großen Computern 
verbunden waren, auf denen 
begeisterte Jugendliche 
ganz weggetreten herum¬ 
hackten, hielten wir Aus¬ 
schau nach einem Commo¬ 
dore C 64. Aber nicht nach 
einem 
nach einem, 
dem oder auch an einen 
Akustikkoppler angeschlos¬ 
sen war. Unsere Erwartun¬ 
gen wurden um einiges ge¬ 
dämpft, als wir nichts der¬ 
gleichen zu sehen bekamen. 
Sollte man uns falsch infor¬ 
miert haben? Waren wir im 
falschen Kaufhaus? 

Schließlich entdeckten wir 
ein Gerät, von dem wir an- 
nahmen, zu Recht annah- 
men, daß es ein Modem war. 
Aber kein C 64 in der Nähe. 
Lediglich ein Apple, dessen 
Tastatur mit einer Plastikhau¬ 
be verdeckt war, stand an 
der nächsten Regalecke 
(Bild 1). Dann bemerkten wir 
auch die Kabelverbindung 
zwischen diesen beiden Ge¬ 
räten. 

Auch ein Bediener war 
nicht zu sehen. Selbst die 
Computer-Fans wußten mit 
dieser Ecke nicht viel anzu¬ 
fangen. Daß sich hier in Kür¬ 
ze erstaunliches abspielen 
sollte, ahnte sicherlich kei¬ 
ner von ihnen. 

Wir hatten kaum Zeit, uns 
das Modem, dieses für Ein¬ 
geweihte so interessante Ge¬ 
rät, genauer anzuschauen, 
als ein Mann auftauchte, der 


sich sofort daran zu schaffen 
machte. Nachdem wir uns 
vergewissert hatten, an den 
Richtigen gekommen zu 
sein, stellten wir uns vor und 
dann die alles einleitende 
Frage; »So, daß also ist das 
Modem ?!« 

Im folgenden Gespräch 
erfuhren wir mehr über das, 
was wir zu sehen bekommen 
sollten. Es war erstens ge¬ 
plant, eine Verbindung zwi¬ 
schen einem C 64 und dem 
schon erwähnten Apple her¬ 
zustellen. Zum anderen soll¬ 
te eine Verbindung mit ei¬ 
nem Computer in Köln ge¬ 
schaffen werden. 

Apple-Programme 
mit dem C 64 
editieren 

Der Commodore 64, mit 
dem der Datenaustausch 
laufen sollte, stand an einem 
anderen Stand, etliche Me¬ 
ter weiter. Angeschlossen 


waren ein Diskettenlaufwerk 
VC 1541, ein Monitor und ein 
Akustikkoppler (Bild 2). 

So, jetzt konnte es losge¬ 
hen. Nachdem noch einmal 
alle Verbindungen geprüft 
waren, wurde zuerst die not¬ 
wendige Software geladen. 
Sie ermöglicht es, alle Daten 
über die RS232-Schnittstelle 
über den Userport an den 
Akustikkoppler zu schicken, 
verarbeitet einkommende 
Daten und speichert den ge¬ 
samten Dialog auf Wunsch 
auf Diskette. 

Jetzt fehlte nur noch eines; 
Die Telefonverbindung. Also 
wurde die Nebenstelle an¬ 
gewählt, unter der das Mo¬ 
dem angeschlossen war. 
Kurze Zeit später meldete 
sich der Apple! Natürlich 
vergewisserten wir uns so¬ 
fort, ob das gleiche Bild auf 
dem Apple-Monitor zu se¬ 
hen war, Und tatsächlich, al¬ 
les lief synchron. Als näch¬ 
stes wurde demonstriert, 
wie der C 64 Programme 
vom Apple holte. Wir ließen 


Bild 1. Der Apple war an das Modem angeschlossen 
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er Telefon ist in Amerika schon fast an der 
:hland eine Sache von wenigen Spezialisten, 
rmonstrierte jetzt einen Datenaustausch 
m C 64 über Modem und Akustikkoppler. 
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uns Basic-Programme aus 
dem Apple-Laufwerk laden 
und konnten sie am C 
64-Momtor listen und auch 
ändern. Auch das Zurück¬ 
speichern verlief ohne Kom¬ 
plikationen. 

Ein ungewohntes Bild war 
es schon. Apple Basic auf 
dem C 64, ohne das die VC 
1541 aktiv war. Natürlich lief 
alles sehr langsam ab, näm¬ 
lich mit 300 Baud (Bit pro Se¬ 
kunde). Das ist die Ge¬ 
schwindigkeit, mit der die 
Daten per Akustikxkoppler 
über die RS232-Schnittstelle 
fließen. Aber es war sehr 
beeindruckend. 

Da alles über das normale 
Telefonnetz lief, stand auch 
einer weiter entfernten Ver¬ 
bindung nichts mehr im 
Weg. Aber sehen wollten wir 
das schon. Und so konnte ei¬ 
ne weitere Aktion ablaufen: 
In Köln stand ein C 64, der 



darauf wartete, mit dem in 
München stehenden Apple 
zu kommunizieren. 

Wir brauchten nur noch 
auf den Anruf des Kölner 
Gegenüber zu warten. Un¬ 
ser Apple stand auf Emp¬ 
fang. Gespannt warteten wir 
darauf, die ersten Zeichen 
auf dem Monitor zu sehen. 
Und auf einmal kamen sie! 
Wir erlebten die Versuche 
des Kölner mit, mit dem App¬ 
le Kontakt aufzunehmen. Je¬ 
de Taste, die er in Köln 
drückte, war bei uns zu se¬ 
hen. Er versuchte eine Mel¬ 
dung für ihn abzurufen. Lei¬ 
der hatten wir in seinen 
»Briefkasten« keine Nach¬ 
richt hineingeschrieben, 
Man merkte ihm seine Ent¬ 
täuschung an. Aber wir 
übermittelten ihm dann di¬ 
rekt unsere Grüße zum Ge¬ 
lingen dieses interessanten 
Versuches. 


Bild 2. Der C 64 war über den Akustikkoppler an das Telefonretz angeschlossen 


Mit normalen Mailboxen 
(Briefkästen) kann man auf 
drei Arten kommunizieren. 
Erstens ist es möglich Nach¬ 
richten einzugeben. Diese 
Nachrichten kann jeder, der 
einen Akustikkoppler be¬ 
sitzt, eingeben und, das ist 
die zweite Funktion, auch ab- 
rufen und lesen. Die dritte 
Möglichkeit ist die direkte 
Verbindung zwischen Anru¬ 
fer und Empfänger. Der 
Empfänger ist immer der 
Computer, der die Mailbox 
unterhält. In unserem Fall 
war das der Apple im Mün¬ 
chener Km i .fhaus. Manche 
Mailbox-Programme lassen 
es auch zu, persönliche 
Nachrichten einzugeben, 
die nur von einem bestimm¬ 
ten Teilnehmer gelesen wer¬ 
den können. Dieser Teilneh¬ 
mer muß dazu einen persön¬ 
lichen »Briefkasten« in dem 


Mailbox-System besitzen, für 
den er in der Regel einen ge¬ 
ringen Beitrag bezahlt. Er er¬ 
hält eine Geheimzahl, ein 
Paßwort, das nur er kennt. 
Somit wird sichergestellt, 
daß nur er die für ihn be¬ 
stimmten Nachrichten lesen 
kann. 

Wir »sprachen« dann noch 
etwas mit Köln und beende¬ 
ten die Verbindung. Die De¬ 
monstration war gelungen 
und wir um einiges Wissen 
reicher. Natürlich juckte es 
uns in den Fingern, diese Er¬ 
kenntnisse auch selbst zu 
verwenden. Über unsere Er¬ 
fahrungen werden wir noch 
ausführlich berichten. 

Als wir das Kaufhaus ver¬ 
ließen, standen die Spiele- 
Freaks immer noch vor ihren 
Computern und hatten keine 
Ahnung, was ihnen entgan¬ 
gen war... (gk) 


Tragbarer Meß- und Steuercomputer SX 64 ADS 


Der Meß- und Steuercompu¬ 
ter SX 64 ADS von Datalog bietet 
als kompakte Einheit die preis¬ 
günstige Möglichkeit, anfallen¬ 
de Meßwerterfassungs-, Regel¬ 
und Steueraufgaben an wech¬ 
selnden Einsatzorten ohne gro¬ 
ßen Geräteaufwand zu lösen. 
Das integrierte Meßdateninter¬ 
face besitzt vier Analog- 
Eingänge mit einer Auflösung 
von 12 Bit, zwei Analog- 
Ausgänge für Regelzwecke, vier 
Digital-TTL- und vier Relais- 
Ausgänge für Steuerungsan¬ 
wendungen. Die Datenrate be¬ 
trägt maximal 50 Messungen pro 
Sekunde zum Abfragen und Set¬ 
zen aller Ein- und Ausgänge. Die 
Programmierung des eingebau¬ 
ten Interfaces geschieht direkt 
in Commodore-Basic und sei 
auch von einem wenig erfahre¬ 
nen Anwender mit Basic-Kennt- 
nissen innerhalb von Minuten zu 
erlernen. 



Weitere Vorzüge des Kom¬ 
paktsystems sind der 5-Zoll- 
Farbbildschirm mit der Mög¬ 
lichkeit, hochauflösende Grafi¬ 
ken (Meßwertkurven) darzustel¬ 
len, sowie die eingebaute 
Floppy Station mit 170 KByte 
Speicherkapazität. Der Compu¬ 
ter selbst ist mit einem RAM- 
Speicher von 64 KByte ausrei¬ 
chend bestückt. Optioneil liefert 
Datalog ein passendes RS232C 
(V.24)-Interface zur Kommunika¬ 
tion mit anderen Systemen. Ins¬ 
besondere wird darauf hinge¬ 
wiesen, daß das komplette 
Software-Angebot für den weit 
verbreiteten C 64-Mikrocompu- 
ter ohne Einschränkungen auf 
dem Meß- und Steuercomputer 
SX 64 ADS lauffähig ist Somit ist 
das System nicht nur auf dem 
Einsatz im technisch-wissen¬ 
schaftlichen Bereich begrenzt. 
Umfangreiche Demo-Software 
sei im Lieferumfang enthalten. 
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Computer Journal 
gesucht 

Wer hat noch Hefte der Jahr¬ 
gänge 82/83 vom inzwischen 
eingestellten Computer Journal 
und kann mir diese ausleihen ? 
Wer besitzt eine Anleitung zum 
Music Composer für den VC 20? 

David Twigg-Flesner 


CBM-Peripherie am 
Commodore 64? 

Ich besitze einen CBM 3032 
mit Diskettenlaufwerk und 
Drucker. Beim Kauf eines Com¬ 
modore 64 möchte ich diese Pe¬ 
ripherie gerne mittels eines 
lEC-Bus-Interfaces weiterver¬ 
wenden. Hat schon jemand Er¬ 
fahrungen mit solchen Interfa¬ 
ces gesammelt, arbeiten sie zu¬ 
verlässig, und wie ist es um die 
mechanische Stabilitä t bestellt? 

Oliver Fischer 


Disketten beidseitig 
verwenden? 

Wenn man mit einem Büro¬ 
locher auf einer einseitig be¬ 
schreibbaren Diskette am lin¬ 
ken Rand eine Stanzung in Höhe 
des Schreibschutzes am rech¬ 
ten Rand vornimm t, laßt sich die 
Diskette beidseitig auf einer 
Floppy-Disk 1541 verwenden. 
Ist die Datensicherheit dabei 
gewährleistet, oder spricht et¬ 
was gegen diese Methode? 

Dipl.-Ing. M. Lohse 


Die Floppy VC 1541 interes¬ 
siert sich nicht für das kleine In¬ 
dexloch in der Diskette. Andere 
Floppystationen benutzen die¬ 
ses Loch zur internen Steuerung 
und Synchronisation. Deshalb 
funktioniert der Trick bei sol¬ 
chen Laufwerken nicht. Bei der 
VC 1541 gibt es jedoch keine 
Probleme. Allerdings ist bei ein¬ 
seitig beschreibbaren Disketten 
auch nur eine Seite durch den 
Hersteller geprüft. Die zweite 
Seite kann daher unter Umstän¬ 
de fehlerhafte Sektoren enthal¬ 
ten, die aber vom Floppy-Be- 
triebssystem dann nicht benutzt 
werden. Wenn Sie nach dem 
Formatieren beim Listen der Di¬ 
rectory die Meldung »664 Blocks 
free« sehen, sollte jedoch die 
Datensicherheit einigermaßen 
gewährleistet sein, 

Für sehr wichtige Aufzeich¬ 
nungen empfiehlt sich jedoch 
immer die Verwendung doppel¬ 
seitig geprüfter Disketten. 


Probleme mit 
Speichererweiterung 

Neulich habe ich mir eine 16- 
KByte-RAM-Erweiterung für 
meinen VC 20 gekauft. Als ich 
aber versuchte, ein Spiel, das 
für 3 KByte-RAM und einen Joy¬ 
stick gedacht ist, laufen zu las¬ 
sen, funktionierte es nicht, ob¬ 
wohl ich einen Joystick habe. 
Wer kann mir helfen? 

Daniel Hüller 

Beim VC 20 liegt der Bild¬ 
schirmspeicher je nach RAM- 
Erweiterung in verschiedenen 
Adreßbereichen. Daher laufen 
viele Programme für die Grund¬ 
version nicht mit Speichererwei¬ 
terung. Einfache Lösung für das 
Problem: Das Steckmodul ent¬ 
fernen. 


SpieW'" wsaljort » *** 
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Fragen Sie doch! 

Selbst bei sorgfältiger Lek¬ 
türe von Handbüchern und 

Programmbeschreibungen 
bleiben beim Anwender im¬ 
mer wieder Fragen offen. Viel 
mehr Fragen ergeben sich 
bei Computer-Interessenten, 
die noch keine festen Kontak¬ 
te zu Händlern, Herstellern 
oder Computerclubs haben. 
Sie können der Redaktion Ih¬ 
re Fragen schreiben oder 
Probleme schildern (am ein¬ 
facheren auf der beigehefte- 
fen ~ Karte). Wir veranlassen, 
daß die Fragen von einem 
Fachmann beantwortet wer¬ 
den. Allgemein interessieren¬ 
de Fragen und Antworten 
werden veröffentlicht. 


RESET über User-Port? 

Um bei meinem Commodore 
64 nach einem Spiel ein anderes 
Programm zu laden, muß in den 
meisten Fällen der Computer 
aus- und dann wieder einge¬ 
schaltet werden. Kann man das 
umgehen, indem man kurzzei¬ 
tig Pin 1 und 3 des User-Ports 
miteinder verbindet, oder führt 
dies zu einer Beschädigung des 
Computers? 

Walter Stiller 

Pin 1 des User-Ports liegt an 
Masse, Pin 3 ist die RESET- 
Leitung. Stellt man kurzfristig ei¬ 
ne Überbrückung her (zum Bei¬ 
spiel mit einer Büroklammer 
oder ähnlichem), dann wird ein 
RESET ausgelöst, wie der Com¬ 
puter ihn auch nach dem Ein¬ 
schalten durchführt. Der RESET 
an sich ist ungefährlich. Falls 
man jedoch beim Manipulieren 
am User-Port unabsichtlich an¬ 
dere Pins miteinander in Verbin¬ 
dung bringt, kann dies zu Be¬ 
schädigungen des VIA-Bau- 
steins führen. Es empfiehlt sich 
daher den Einsatz eines kleinen 
Tastschalters. 


In der Ausgabe 8/84 zeigen 
wir übrigens verschiedene 
Möglichkeiten, Reset-Tasten an¬ 
zubringen. 


Nochmals DOS 5.1 

Der Artikel über das DOS 5.1 
in der Ausgabe 5/84 ist ja sehr 
interessant. Leider kann man 
bei den meisten kommerziellen 
Programmen aber nichts damit 
anfangen, da man aus diesen 
Programmen nur durch Ab¬ 
schalten des Computers wieder 
herauskommt. Aber dann ist 
auch das DOS 5.1 verloren, und 
es jedesmal neu einzuladen ist 
doch zu umständlich. Kann man 
da nichts dran machen? 

Heinrich Carstensen 

Das DOS 5.1 ist eigentlich nur 
bei der Programmentwicklung 
nützlich. Es erleichtert das Ar¬ 
beiten mit der Floppy, indem es 
Abkürzungen verwendet. Wenn 
man Spiele oder andere kom¬ 
merzielle Software benutzt, ist 
die Anwendung des DOS sowie¬ 
so wenig sinnvoll. 


64 KByte-Erweiterung 
für VC 20? 

Als VC 20-Anwender möchte 
ich mir eventuell eine 64-KByte- 
RAM-Karte kaufen. Welche der 
angebotenen Karten ist die be¬ 
ste? Gibt es bei der Anwendung 
Probleme, zum Beispiel beim 
Laden von Programmen für die 
Grundversion? Gibt es über¬ 
haupt eine Möglichkeit, die 64 
KByte voll zu nutzen, vielleicht 
als RAM-Disk? 

Jens Bümmerstede 

Wir werden in einer der näch¬ 
sten Ausgaben eine 64-KByte- 
RAM-Karte testen. Soviel vor¬ 
weg, eine Pseudo-Floppy (oder 
RAM-Disk) läßt sich durchaus 
realisieren. 


10 
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Schachprogramme 

Frage: Wer kennt Spielstärke 
Schachprogramme? 

Ausgabe: 5/84 

Peter Jugl 

In einem aktuellen neutralen 
Vergleich in England wurden 
die folgenden Schachprogram¬ 
me für den C 64 unter Turnierbe¬ 
dingungen (= 3 min/Zug) gete¬ 
stet: SARGONII, CHES 7.0, CO- 
LOSSUS 2.0 und GRANDMA¬ 
STER. Jedes Programm spielte 
dabei gegen jedes je einmal mit 
weiß und schwarz. Dabei wurde 
folgendes Endergebnis erzielt: 


Wie Herr Wacker aber richtig 
schrieb, sind alle heutigen 
Schachprogramme für Home¬ 
computer und selbst die neue¬ 
sten Schachcomputer noch nicht 
in der Lage, gegen gute Vereins¬ 
spieler zu bestehen. Entschei¬ 
dende Besserung dürfte erst mit 
modernerer Hardware (z.B. 
16/32-Bit Prozessor) zu erwarten 
sein. Fritz Schäfter, Kingsoft 



String. »NAME: »MEIER, AN¬ 
DREAS«« ginge nicht. Der Dop¬ 
pelpunkt wird zwar nicht stören, 
wohl aber das Komma. Textteile, 
die selbst in Anführungszeichen 
stehen dürfen also keine Trenn¬ 
zeichen enthalten (,;:). 

Metin A. Savignano 



Zehnertastatur für C 64 

Frage: Gibt es eine zusätzli¬ 
che Zehnertastatur (Ziffem- 


block) zum Anschluß an den 
C 64? 

Ausgabe: 4/84 

Arndt Grass 

Die Firma Computertechnik 
Hartmann. Bismarckstraße 5 in 
6360 Friedberg 1, Tel. 06031/ 
14863, bietet für 89 Mark plus 
Versandkosten eine solche Ta¬ 
statur an. Sie besitzt 20 Tasten, 
nämlich Zehnerblock, Punkt, 
Komma, Leer- und Return-Taste 
sowie die Buchstaben A bis F 
(zur Verwendung bei hexadezi¬ 
maler Eingabe). Die Tastatur ist 
sowohl für den C 64 als auch für 
den VC 20 zu verwenden. 

Gero Morres 


Sprachausgabe 
mit VC 20 

Frage: Wer kennt ein Pro¬ 
gramm zur Erzeugung von Spra¬ 
che auf dem VC 20? 

Ausgabe: 5/84 

Georg Brandt 

Die Firma Adman Electronics 
Ltd., Ripon Way, Harrogate 
N.Yorks. HG 12AU in Großbritan¬ 
nien bietet für den VC 20 / V 64 
einen Speech-Synthesizer für 
englische Sprachausgabe zum 
Preis von 49,95 Pfund an. 

Spiele dafür sind von Bugbyte 
(Twin Kingdom Valley), Voyager 
(Attack, Attack) und Thor Com¬ 
puter Software (3D Silicon Fish) 
schon im britischen Fachhandel 
erhältlich. 

David Twigg-Flesner 


^-Anweisungen laufen meine 
Programme nun völlig störungs¬ 
frei. Hans-Jürgen Stadelmann 



Rechengenauigkeit 


Frage: Wie erklärt sich der 
Unterschied in der Rechenge¬ 
nauigkeit von Taschenrechnern 
und Computern? 

Ausgabe: 5/84 

Albert Bartels 
Ihre Antwort zur Leserfrage ist 
natürlich richtig. Die Rechenge¬ 
nauigkeit des Computers ist ge¬ 
ringer. Allerdings wurde die 
Frage nur teüweise beantwortet. 
Das Ergebnis der Berechnung 
des Computers wird in Bogen¬ 



Grafik mit VC 1515 


Programm 

Gewonnen 

Remis Verloren 

Punkte 

1. Grandmaster 

4 

2 

— 

5 

2. Chess 7.0 

2 

3 

1 

3,5 

3. Colossus 2.0 

2 

2 

2 

3 

4. Sargon II 

— 

1 

5 

0,5 


maß ausgegeben. Die meisten 
Taschenrechnern berechnen je¬ 
doch in Gradmaß. 

Um das Ergebnis des Compu¬ 
ters in Grandmaß zu erhalten 
muß folgende Umrechnung er¬ 
folgen, wobei für x der jeweilige 
Winkel, für pi 3.14159265 einge¬ 
setzt werden muß: 


Komma als Satzzeichen 

Frage: Wie kann ich bei dem 
INPUT-Befehl das Komma als 
Satzzeichen verwenden? 
Ausgabe: 5/84 

Gerhard Giessmann 

Kommata bei INPUT einzuge¬ 
ben funktioniert durchaus, vor¬ 
ausgesetzt die Eingabe steht in 
Anführungszeichen. HALLO, 
WIE GEHT’S? geht nicht, »HAL¬ 
LO, WIE GEHT'S?« aber schon. 
Die Anführungszeichen stehen 
nachher nicht in der Variablen, 
sie lassen den Computer ledig¬ 
lich das Komma als das ansehen, 
was es sein soll: Teü des einge¬ 
gebenen Strings. Das gleiche 
gilt für den Strichpunkt und den 
Doppelpunkt. Enthält die Einga¬ 
be selbst auch Anführungszei¬ 
chen heißt es aufpassen: Das er¬ 
ste Anführungszeichen in der 
Eingabe hebt das Anfangsan¬ 
führungszeichen wieder auf, ein 
nachfolgendes Komma würde 
wieder als Trennzeichen inter¬ 
pretiert. »ICH HEISSE »WRXL«, 
UND DU?« ginge durchaus. Das 
erste Anführungszeichen ist 
zwar durch das zweite aufgeho¬ 
ben, dann folgt jedoch noch ein 
drittes, das dem Computer wie¬ 
der sagt: es folgt ein reiner 



Beim VC 20 liegt der Modul¬ 
bereich von $A000 bis $BFFF 
und läßt sich mit folgender Ein¬ 
gabe auf Diskette kopieren: 
POKE 43,0: POKE 44,160: POKE 
45,0 : POKE 46,192 : SAVE 
»(Name)»,8. 

Wer kann mir mitteilen, wo 
der Modulbereich meines Com- 
modore 64 liegt und ob es eine 
ähnliche Routine zum Abspei- 
chem dieses Bereichs auf Dis¬ 
kette gibt? 

Hartmut Götze 

Der Steckmodulbereich beim 
Commodore 64 liegt von $8000 
bis $9FFF. In der obengenann¬ 
ten SÄVE-Routinen müssen da¬ 
her der POKE-Wert 160 durch 
128 und der Wert 192 durch 160 
ersetzt werden. Allerdings ha¬ 
ben die Hersteller von Steckmo¬ 
dulen in der Regel einige Siche¬ 
rungen gegen unerlaubtes Ko¬ 
pieren eingebaut. 


Frage: Wie kann man verhin¬ 
dern, daß der VC 1515 Drucker 
von Zeit zu Zeit mit der Fehler¬ 
meldung »DEVICE NOT PRE¬ 
SENT ERROR« aussteigt? 
Ausgabe: 5/84 

Joachim Bolle 

Das Problem läßt sich auch 
umgehen, wenn man alle PRINT 
^-Anweisungen durch normale 
PRINT-Befehle ersetzt. Zu die¬ 
sem Zweck muß die Ausgabe 
mit der CMD-Anweisung auf 
den Druckerkanal umgelegt 
werden. 

In meinen Programmen erfol¬ 
gen Ausgaben auf dem Drucker 
also nicht mehr so: 

OPEN 4,4 : PRINT#4, "Test": 
CLOSE 4, 

sondern in der folgenden Form: 
OPEN 4,4: CMD 4 : PRINT "Test" 

: PRINT #4 : CLOSE 4 
Durch den Wegfall der PRINT 


Gradmaß Bogenmaß 
Sin x = Sin (x*pi/180) 
Beispiel: Sin 45 = 45*3.141592 
65/180) 


Siegfried Dietrich 
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Steckmodule 

abspeichern? 
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D ie Tatsache, daß sich bisher 
kaum ein Hersteller von Heim- 
computem zu einer Normung 
der Verbindungsports durchgerun¬ 
gen hat, ist sicher jedem C 64- 
Besitzer bekannt. Wer einmal ver¬ 
sucht hat, einen anderen, als einen 
Commodore-Drucker an seinen 
Computer anzuschließen, wird fest¬ 
gestellt haben, daß dies nicht ganz 
unproblematisch ist. Weder am 
Drucker, noch am C 64 befindet sich 
ein Ausgang, der dem anderen auch 
nur im entferntesten ähnelt. Da aber 
gerade die Drucker von Fremdher- 
stellem oft mit überlegenen Leistun¬ 
gen aufwarten können, ist ein stän¬ 
dig wachsender Markt von Schnitt¬ 
stellen verschiedenster Konstruk¬ 
tionsweisen entstanden. 

Das Hauptunterscheidungsmerk¬ 
mal bei diesen Schnittstellen ist die 
Art der Datenübertragung und -an- 
passung, Zum einen werden soge¬ 
nannte Softwarelösungen angebo- 
ten, bei denen die Anpassungen der 
Daten mit Hilfe von ladbarer bezie¬ 


hungsweise auf Eproms steckbarer 
Software im Computer selbst vorge¬ 
nommen und über den User-Port 
zum Drucker gesendet wird. Zum 
anderen gibt es die Hardwarelösun¬ 
gen (Bild 1), die, mit eigenem Prozes¬ 
sor versehen, die Datenanpassung 
auf einer externen Platine durchfüh¬ 
ren und ausnahmslos den seriellen 
Bus zur Datenübertragung verwen¬ 
den. 

Der Testablauf 

Getestet wurden natürlich sowohl 
Hard- als auch Softwareschnittstel¬ 
len (Bild 2). Die Vertreter der Hard¬ 
wareseite waren das Görlitz-Inter¬ 
face, zwei ungleiche Versionen von 
Wiesemann und das weit verbreite¬ 
te Data Becker-Interface. Auf der 
Softwareseite traten die Eprom-Ver- 
sionen von Kalawsky, Bockstaller 
und die Diskettenversion der in die¬ 
sem Heft beschriebenen Schnittstel¬ 
le unseres Lesers Helmut Eyssele, 
zum Test an. 


we \efe\etv ^ 


Erstes Testkriterium waren alle in 
den zugehörigen Bedienungsanlei¬ 
tungen angegebenen Funktionen. 
Zusätzlich mußten die Kandidaten 
noch zwei Sonderprüfungen able- 
gen: Ihre Verträglichkeit mit einer 
Reihe von bekannten Textverarbei¬ 
tungsprogrammen (siehe Bild 3) und 
ihre Fähigkeiten bei der Erstellung 
einer Hardcopy vom Bildschirmin¬ 
halt (was noch für Überraschungen 
sorgte). Da die einzelnen Testteil¬ 
nehmer über die verschiedensten 
Befehle zur Ansteuerung ihrer 
Funktionen verfügen, war es nicht 
sinnvoll, ein einheitliches Testpro¬ 
gramm zu schreiben. Es wurde aber 
trotzdem versucht, ähnliche Funktio¬ 
nen zu vergleichen. 


Der Alleskönner 


Mit zirka 340 Mark nicht gerade 
das billigste, stellte sich das Görlitz- 
Interface zum Test. Diese Hardwa¬ 
relösung ist zum Einbau in einen Ep¬ 
son MX/RX/FX 80-Drucker vorge¬ 
sehen. Der Einbau ist, auch für tech¬ 
nische Laien, problemlos, denn die 
Platine (Bild 1) wird lediglich in den 
geöffneten Drucker eingesteckt 
und ist sofort betriebsbereit. Der 
Epson wird fortan wie ein Commo- 













ces durch die folgenden Basic- 
Zeilen: 

100 OPEN 1,4 :REM Druckerkanal 
öffnen 

110 PRINT# 1,CHR$(27)"V”:REM 
VCEI Grafic 

120 PRINT #1,CHR$(08):REM 7- 
Nadel Einzelp. 

130 OPEN9,4 ) 9,”7 ,, :REM Zeüenabst. 
auf 0 

140 Copy:REM Simons Basic Hard¬ 
copy 

150 CLOSEl;CLOSE9:REM Drucker- 
kan.schl. 

IGO END 

konnte der Ausdruck beginnen. Ein 
kleines Testprogramm erstellte die 
auszudruckende hochauflösende 
Grafik und der Drucker begann sei¬ 
ne Arbeit. Nach zirka 40 Sekunden 
war der Bildschirminhalt auf Papier 
verewigt, allerdings war der Aus¬ 
druck etwas klein. Aber auch hier 
bietet das Görlitz VCEI eine Verän¬ 
derungsmöglichkeit an: Durch Ein¬ 
fügen einer zusätzlichen Zeile ist ei¬ 
ne variable Breite des Ausdrucks 
möglich. Bei dieser Fülle von An¬ 
wendungsmöglichkeiten erscheint 
es fast schon selbstverständlich, 
daß auch bei der Konzeption der 
Platine an den Anwender gedacht 
wurde. So ist beispielsweise der se¬ 
rielle Bus am Interface doppelt vor¬ 
handen, damit der Drucker nicht 
das letzte angeschlossene Gerät 
sein muß. Die mögliche Abschalt¬ 


Die Düsseldorfer 
Lösung 


Für den Einbau des VCI von Data 
Becker gilt das gleiche, wie für das 
Görlitz-Interface. Leider hat man bei 
Data Becker vergessen, den seriel¬ 
len Bus durchzuführen, so daß der 
Drucker das letzte Gerät sein muß. 
Wie aus Büd 3 ersichtlich ist, sind 
Listing-Modus, Grafik- und reverse 
Zeichen sowie der Direkt-Modus 
verfügbar und über Sekundär¬ 
adressen einzustellen. Auch ein 
spezieller Grafikmodus. Die Frage, 
ob diese Grafikfähigkeit aber auch 
für einen Büdschirmausdruck genü¬ 
gend war, ließ die Redaktion voller 
Erwartungen an den Hardcopytest 

herangehen. Naheliegend war es 
natürlich, das Hilfsprogramm aus 
dem gleichen Hause, die Supergra¬ 
fik, zu verwenden. Getreulich den 
Worten der Anleitung folgend, ver¬ 
suchten wir mit dem Befehl für Acht- 
Nadel-Drucker, ein Bild zu kopie¬ 
ren. Das Ergebnis war ernüchternd, 
denn der Drucker regte sich zwar, 
aber das was er druckte, sah aus wie 
Nebel über London. Erst als wir es 
mit dem Sieben-Nadel-Hardcopy- 
befehl versuchten, hatten wir Erfolg. 
Von diesem Erlebnis angespornt 
versuchten wir es auch noch mit Si¬ 
mons Basic. Nach dem Eingeben 
des folgenden kleinen Programms 
klappte es auf Anhieb. 

100 OPEN 1,4:REM Druckerkanal 
öffnen 

110 PRINT #1,CHR$(8):REM Grafik 
Modus 


dore-Drucker angesprochen. Die 
Commodore-eigenen Steuerzei¬ 
chen werden dabei, wie gewohnt, 
als reverse Grafiksymbole ausge¬ 
druckt. Dies deutet darauf hin, daß 
auch die Grafikzeichen dem 
Drucker keine Schwierigkeiten be¬ 
reiten. Der eingebaute Selbsttest 
(nicht der des Druckers) zeigt den 
gesamten neuen Zeichensatz. Wem 
das aber immer noch zu wenig ist, 
hat die Gelegenheit den gesamten 
CBM-Zeichensatz in bis zu vierzig 
Variationen aus doppelter Breite, 
doppelter Höhe und reverser Dar¬ 
stellung auszudrucken. Ferner ver¬ 
fügt das Görlitz-Interface über einen 
Grafik-Modus, in dem alle Zeichen, 
deren Code größer als 127 ist, als 
senkrechte Punktreihe aufgefaßt 
werden. Durch Aneinanderreihen 
vieler dieser Reihen können belie¬ 
bige Zeichen gedruckt werden. 
Daß die Steuer- und Formatierungs¬ 
befehle, wie sie imEpson-Handbuch 
beschrieben sind, in jedem Modus 
erhalten bleiben, gefiel beim Test 
besonders. 

Die letzte Station unserer Testrei¬ 
he, der Bildschirmausdruck, wurde 
mit besonderer Spannung erwartet. 
Die Aufgabe lautete: Mit den in der 
Data Becker-Supergrafik und Si¬ 
mons Basic enthaltenen Hardcopy¬ 
routinen in möglichst kurzer Zeit ei¬ 
nen genauen Abdruck des Bild¬ 
schirms auf das Papier zu bringen. 
Nach der Vorbereitung des Interfa¬ 


barkeit der Schnittstelle ist dann 
sinnvoll, wenn der Drucker auch 
noch an anderen Computern einge¬ 
setzt werden soll. Man erspart sich 
so den Ausbau des Interfaces. Eine 
Besonderheit, mit der sonst keine 
andere der im Test befindlichen 
Schnittstellen aufwarten konnte, ist 
der eingebaute Pufferspeicher von 
zwei KByte. Dies ist besonders ange¬ 
nehm beim Arbeiten mit Textverar¬ 
beitungsprogrammen, da bereits 
weitergeschrieben werden kann, 
während der Drucker noch arbeitet. 
Beim Test der Kooperation mit den 
Textverarbeitungsprogrammen gab 
es in keinem Fall Probleme beim 
Ausdrucken der Texte. 

Insgesamt machte das Görlitz- 
Interface einen hervorragenden 
Eindruck. Beim ständigen Arbeiten 
mit dem Drucker vergißt man nach 
einiger Zeit vollkommen, daß der 
Epson FX 80 eigentlich nicht speziell 
für den Commodore 64 konzipiert 
wurde. 
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120 PRINT #1,CHR$(26):REM Grafik 
Byte wiederh. 

130 Copy: REM Simons Basic Hard¬ 
copy 

140 CLOSELREM Druckerkanal 
schließen 

Was wir nicht erwartet hatten: Es 
gab bei den Zeitmessungen für die 
Hardcopyausdrucke enorme Unter¬ 
schiede zwischen den einzelnen 
Schnittstellen. Für das gleiche Bild 
benötigte das Data Becker-Interface 
sechsmal länger (zirka 4 Minuten) 
als das Görlitz-Interface. Dies ist 
wahrscheinlich damit zu erklären, 
daß durch das VCI ein Commodore 
1526 simuliert wird (ohne dabei auf 
die Vorzüge des Epson-Druckers zu 
verzichten), der aber selbst mit neu¬ 
em ROM nur ein frei definierbares 
Zeichen besitzt. Das Zusammen¬ 
spiel mit den ausgewählten Textve¬ 
rarbeitungsprogrammen funktio¬ 
nierte auch mit dem VCI einwand¬ 


frei. Wer aber lieber eigene Texte 
eingeben, beziehungsweise in sei¬ 
ne Programme einbauen will, wird 
die Funktion »Festlegen der Druck¬ 
position« des VCI bald nicht mehr 
missen wollen. Durch diese Funk¬ 
tion ist es möglich, die Punktposi¬ 
tion, ab der ein Text auf dem Papier 
gedruckt werden soll, festzulegen. 

Bis auf die etwas langsame Hard¬ 
copy ist dem Data Becker-Interface 
wenig Negatives nachzusagen, 
wenn es auch nicht ganz die Mög¬ 
lichkeiten der Görlitz-Schnittstelle 
bietet. Dafür ist es aber mit 298 Mark 
auch um 40 Mark billiger als das 
Görlitz-Pendant. Das ist natürlich im¬ 
mer noch ein stolzer Preis. 


Zwei ungleiche Brüder 


Die nächsten beiden Testgeräte 
von Wiesemann sehen zwar äußer¬ 


lich vollkommen gleich aus, in ihren 
Leistungsmerkmalen unterschei¬ 
den sie sich aber erheblich. Das in¬ 
telligentere der beiden hat den Na¬ 
men VC 20/CBM 64-Interface Typ 
9200 NEC und ist für NEC und kom¬ 
patible Drucker vorgesehen. Sein 
Bruder verzichtet auf den Zusatz 
NEC im Namen und auch auf so 
manche Fähigkeit. Er ist für die An¬ 
steuerung eines Epson-Dmckers 
vorgesehen. Die Installation dieser 
Schnittstellen ist vorbildlich einfach, 
denn sie werden nur in den Eingang 
des Druckers, beziehungsweise 
den seriellen Ausgang des C 64 ein¬ 
gesteckt. Lediglich bei der Version 
für Epson-Drucker ist für die not¬ 
wendige Stromversorgung des In¬ 
terfaces zu sorgen. Dafür eignet sich 
am besten das gegen Aufpreis er¬ 
hältliche Netzteil. Wer aber mit Löt¬ 
kolben und Meßgeräten vertraut ist, 
wird in der Bedienungsanleitung 


Hersteller (Typ) 

Merkmal 

Görlitz 
Computer¬ 
bau VCEI 

Wiesemann 
(Typ 9200 
für NEC) 

Wiesemann 
(Typ 9200 
für Epson) 

Data Becker 
(VCI) 

Eyssele 

Kalawsky 

Ing. Büro 

Bockstaller 

, Preis ca: 

342- 

298,- 

248,— ohne 
298,— mit 
Netzteü 

298,- 

50,- 

85 - + 
(Material 
und Kabel) 

130- 

Art der 

Schnittstelle 

Hardware 

Hardware 

Hardware 

Haiaware 

Software 

Software 

Software 

Form der 
Schnittstelle 

Einbau in 

Epson- 

Drucker 

extern in 
eigenem 
Gehäuse 

extern in 
eigenem 
Gehäuse 

Einbau in 

Epson- 

Drucker 

Diskette 
und Kabel 

EPROM 
und Kabel 

EPROM 
und Kabel 

Grafikzeichen 

Ja 

Ja 

Nein 

Ja 

Ja 

Nein 

Nein 

Reverse Zeichen 

Ja 

Ja 

Nein 

Ja 

Ja 

Nein 

Nein 

Listing Modus 

Ja 

Ja 

Nein 

Ja 

Ja 

Nein 

Nein 

Direkt Modus 

Ja 

Ja 

Ja 

Ja 

Ja 

Ja 

Ja 

Ceräteadresse 

4 

einstellbar 

0-15 

4 

einstellbar 

5 

4 

einstellbar 

5 

4 

einstellbar 

5 

4/16/17/18/19 
mit beson¬ 
deren Funk¬ 
tionen 

4 

4 

Grafikfahigkeit 

Ja 

Ja 

Nein 

Ja 

Nein 

Nein 

Nein 

1 Hardcopy mit 

Ja mit 

Simons Basic 

Ja mit DB 
Supergrafik 
Ja, mit 
Simons B. 

Nein 

Ja mit DB 
Supergrafik 
Ja, mit 

Simons B. 

Nein 

Ja, von bei. 
Bild auf 
Tastendruck 

Nein 

Zeitbedarf für eine 
, Hardcopy ca. 

0:45 min 

4:00 


4:00 


0:45 einf. 

2:30 dopp. 


Druck mit: 

SM-Text 

Ja 

Ja 

Ja 

Ja 

Nein 

Ja 

Nein 

Textomat 

Ja 

Ja 

Ja 

Ja 

Nein 

Ja 

Nein 

Vizawrite 

Ja 

Ja 

Ja 

Ja 

Ja 

Ja 

Ja 

Wordpro 3 + 
Wordpro 1526 

Ja 

Ja 

Ja 

Ja 

Nein 

Nein 

Nein 

Druck mit CP/M 

Ja 

Ja 

Ja 

Ja 

Nein 

Nein 

Nein 


Bid 3. Die Vergleichstabde der Testkandidaten 
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des Interfaces noch auf eine zweite 
Möglichkeit hingewiesen: die Ent¬ 
nahme der Versorgungsspannung 
von der Druckerplatine. Dieser Ein¬ 
griff erfordert allerdings größte Vor¬ 
sicht. Denn ein falscher Anschluß 
kann den »Tod« einer ganzen IC- 
Familie bedeuten. 

Die Merkmale der Epson-Version 
sind rasch beschrieben, da sie sich 
lediglich auf die Ausgabe von Tex¬ 
ten beschränken. Hierfür ist diese 
Schnittstelle mit Groß- und Klein¬ 
schriftmodus, sowie einigen Textfor¬ 
matierungsbefehlen ausgerüstet. 
Durch die Bauweise als Hardware¬ 
schnittstelle tauchten keine Proble¬ 
me mit den zur Verfügung stehen¬ 
den Textverarbeitungsprogrammen 
auf. Die Darstellung von Grafik- und 
Steuerzeichen ist leider nicht mög¬ 
lich. In diesem Bereich bietet das 
9200 (NEC) die gleichen Funktionen 
wie das Data Becker VCI, kaum ver¬ 
wunderlich, wenn man weiß, wer 
der Hersteller des VCI ist: Wiese¬ 
mann. Der auffallendste Unter¬ 
schied vom 9200 NEC zum VCI ist 
die Möglichkeit, den Drucker in ei¬ 
nen 6-Punkt-Modus zu schalten. Da¬ 
durch bleiben Programme, die für 
den 1515 Commodore-Drucker ent¬ 
wickelt wurden, weiterhin verwend¬ 
bar. 

Im wesentlichen gilt für das 9200 
NEC-Interface das gleiche wie für 
das Data Becker-VCI. Lediglich auf 
den Einbau in den Drucker kann 
verziehet werden. 

Die Epson-Version des 9200 eignet 
sich vor allem für jenen Computer¬ 
besitzer, die sich auf das problemlo¬ 
se Ausdrucken von Texten be¬ 
schränken wollen. Allerdings liegt 
der Preis mit 248 ohne und 298 Mark 
mit Netzteil unverhältnismäßig hoch. 


Der Außenseiter 


Besonders gespannt waren wir 
auf das Abschneiden der Schnitt¬ 
stelle unseres Lesers H.Eyssele im 
Vergleich zu den professionellen. 
Wie die Verbindung zwischen dem 
Computer und dem Drucker herge¬ 
stellt wird, braucht sicher nicht 
mehr erklärt werden, da dies ge¬ 
nauestem in einem eigenen Bericht 
beschrieben ist. Ganz besonders 
gefallen haben uns die Möglichkei¬ 
ten des Listingausdrucks. Die Um¬ 
wandlung der Steuerzeichen in 
Klarschrift ist eine Funktion, die kein 
anderes Interface anbietet. Da¬ 
durch spart man sich beim Eintip¬ 
pen oder Korrigieren eines Listings 
das Nachschlagen der Steuercodes 
in der Vergleichstabelle. Die vorlie¬ 


gende Version der Schnittstelle 
funktionierte zwar nur in Verbin¬ 
dung mit Vizawrite, kann aber si¬ 
cherlich ohne großen Aufv/and an 
andere Programme angepaßt wer¬ 
den. Eine Hardcopy war leider noch 
nicht möglich. Hier geht der Aufruf 
an alle Programmierer, dies etwa als 
Teil unseres Programmierwettbe¬ 
werbs »Programmbibliothek« zu er¬ 
gänzen. (Die Redaktion wartet ge¬ 
spannt darauf). 

Zum Preis von zirka 50 Mark (für 
das Kabel) bietet dieses Interface 
Leistungsmerkmale, wie sie eigent¬ 
lich nur von professionellen Schnitt¬ 
stellen zu erwarten sind. Damit si¬ 
cherte sich diese Lösung einen der 
vorderen Plätze der Bewertung, 


Der Hardcopyspezialist 

Die Kalawsky-Schnittstelle, deren 
Software nicht von Diskette, sondern 
durch ein Steckmodul in den C 64 
eingeladen wird, überraschte 
durch eine komfortable Hardcopy¬ 
routine. Ein beliebiger Bildschirmin¬ 
halt kann durch einfachen Tasten¬ 
druck (CTRL-) auf den Drucker 
übertragen werden. Das Hardcopy 
benötigt etwa die gleiche Zeit wie 
das Görlitz-Interface mit SmuSis Ba¬ 
sic. Ein Drücken der Tasten CTRL 
und x ermöglicht sogar ein großes 
Hardcopy auf die gesamte Blattbrei¬ 
te. Da manche Bilder als inverser 
Ausdruck besser aussehen, kann 
das Hardcopy auch in dieser Form 
ausgegeben werden. Natürlich ist 
auch die Textausgabe mit der Ka- 
lawsky Schnittstelle möglich, Dafür 
sollte man allerdings am besten ein 
Textverarbeitungsprogramm ver¬ 
wenden, da bei der direkten Ausga¬ 
be von Print-Zeilen im Groß/Klein- 
schriftmodus des C 64 Großbuchsta¬ 
ben als kursive Zeichen gedruckt 
werden. Dadurch leidet die Lesbar¬ 
keit doch stark. Mit 85 Mark für das 
Eprom, wo noch die Kosten für ein 
Verbindungskabel (zirka 45 Mark) 
hinzukommen, liegt der Preis sicher 
nicht in unerschwinglichen Höhen. 

Für jeden, der sowohl Texte verar¬ 
beiten, als auch Hardcopys von be¬ 
liebigen Bildern anfertigen möchte, 
ist dieses Interface ein nützliches In¬ 
strument. 

Der äußeren Form des Kalawsky- 
Interface ähnlich präsentiert sich 
das Bockstaller-Interface. Die Be¬ 
standteile sind eine Epromplatine 
und ein Verbindungskabel. Diese 
Lösung macht sowohl Textausgaben 
von Basic aus, als auch mit dem Text¬ 
verarbeitungsprogramm Vizawrite 
möglich. Der Groß/Kleinschriftmo¬ 


Hardwaretest 


dus bleibt in jedem Fall erhalten. 
Für die Ausgabe von Grafiken und 
Hardcopys ist diese Schnittstelle al¬ 
lerdings weniger geeignet. Mit die¬ 
sen Leistungen ist sie bei einem 
Preis von zirka 130 Mark zwar etwa 
gleich teuer wie das Kalawsky- 
Interface, besitzt aber nicht deren 
komfortable Hardcopyroutine. 


Die Bewertung 


Der Test hat gezeigt, daß jede 
Schnittstelle mit besonderen Fähig¬ 
keiten und Vorzügen aufwarten 
kann. An der Spitze des Testfeldes 
plazierten sich unserer Meinung 
nach die drei Hardwarelösungen 
von Görlitz, Data Becker und Wiese¬ 
mann (NEC). Dabei belegte das 
Görlitz-Interface wegen seiner uni¬ 
versellen Anwendbarkeit und dem 
vorbildlichen Aufbau der Platine 
den ersten Platz. Zwischen den bei¬ 
den Interfaces von Data Becker und 
Wiesemann war der Unterschied 
nur gering. So wurde salomonisch 
beschlossen, diesen beiden Schnitt¬ 
stellen den zweiten Platz gemein¬ 
sam anzuerkennen. Für die Überra¬ 
schungsorgte der Außenseiter: Der 
dritte Platz konnte an die Lösung un¬ 
seres Lesers vergeben werden, und 
das lag nicht nur an dem unübertrof¬ 
fenen Preis-Leistungsverhältnis. 
Knapp geschlagen plazierte sich 
das Kalawsky-Interface auf dem 
vierten Platz. Mit seiner Hardcopy¬ 
routine auf Tastendruck und der 
Möglichkeit der Textverarbeitung 
bietet es zu einem annehmbaren 
Preis eine gute Leistung. Die 
Schlußlichter des Testes bildeten 
das Wiesemann (Epson) und das 
Bockstaller-Interface. Obwohl sich 
das 9200 (Epson) zur reinen Textver- 
arbeitung hervorragend eignet, ist 
es mit einem Preis von zirka 298 
Mark doch etwas teuer geraten. Das 
Bockstaller-Interface ist eine Lösung 
für alle, die ohne große finanzielle 
Ausgabe Texte ausdrucken wollen 
und sich die Zeit zum Laden der Soft¬ 
ware sparen wollen. 

Sicherlich muß jeder potentielle 
Käufer eines Interfaces sich über 
seine eigenen Anwendungszwecke 
im Klaren sein. Auch spielt der zur 
Verfügung stehende Geldbetrag ei¬ 
ne wesentliche Rolle. Die Entschei¬ 
dung für eines der getesteten Inter¬ 
faces ist deshalb immer eine indivi¬ 
duelle, bei der nicht vergessen wer¬ 
den sollte, daß die Ansprüche an 
den Drucker mit der Zeit bestimmt 
nicht geringer werden. 

(Arnd Wängler) 
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Modem und Akustikkoppler 




U m mit Ihrem C 64 in die Weit 
der Datenfernübertragung 
eintreten zu können, brau¬ 
chen Sie, neben Ihrem Computer 
und einem Monitor (Fernseher), 
drei zusätzliche Werkzeuge. Als 
erstes wäre ein Modem oder ein 
Akustikkoppler für die Verbin¬ 
dung zum Telefon notwendig. 
Dann benötigen Sie ein Interface, 
um die Verbindung zwischen 
Akustikkoppler und Computer 
herzustellen. Das letzte, fast wich¬ 
tigste Werkzeug ist die Treiber¬ 
software. Erst dann können die 
Daten auch tatsächlich übertra¬ 
gen werden. Eines dieser Pro¬ 
gramme ist Teleterm von Softwa¬ 
re Express. 




J* ßS-232- 
Schnittstelie 


c> 




Am Anfang des Programms 
kann man die Sprache auswäh¬ 
len, mit der man arbeiten will. Zur 
Auswahl stehen Deutsch und 
Englisch. 

Teleterm bietet über ein kom¬ 
fortables Menü vielseitige Mög¬ 
lichkeiten. Man kann zum Bei¬ 
spiel ein ständiges Protokoll auf 
der Diskette abspeichern. Dieses 
Programm lädt dabei alle Daten 


in einen Puffer, der dann, sobald 
er gefüllt ist, die Daten auf die 
Diskette schreibt. Der Schreib¬ 
vorgang wird durch Änderung 
der Rahmenfarbe angezeigt. Die¬ 
se Protokollierung ist oft sehr 
nützlich, kann aber auch zum Pro¬ 
blem werden. Manche Mail¬ 
boxen und Datenbanken haben 
einen Timeout. Timeout bedeu¬ 
tet: Wenn eine bestimmte Zeit kei- 
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Modem und Akustikkoppler 


Bei diesem Menü fallen zwei 
Punkte besonders auf, Zum einen 
ist dies die Funktion »Parameter 
ändern«, Ruft man die Funktion 
»Parameter ändern« auf, dann 
können folgende Einstellungen 
verändert werden: die Übertra¬ 
gungsgeschwindigkeit (Baudra¬ 
te), die Parität, die Wortlänge, die 
Anzahl der Stopbits, den Hand¬ 
shake-Betrieb und die Sendeart 
(Vollduplex/Halbduplex). 

Die Bedeutung der oben er¬ 
wähnten Begriffe entnehmen Sie 
P bitte unserer Übersichtstabelle. 

■7 Der zweite auffällige Punkt ist 
i die Möglichkeit, die Funktionsta- 
/ sten zu belegen. Besonders die¬ 

ses Statement macht das Pro¬ 
gramm sehr komfortabel. Man 
kann die Funktionstasten zum 
Beispiel mit häufig vorkommen¬ 
den Textstrings belegen und sich 



so viel Tipparbeit ersparen. 


Der Testbetrieb 




Teleterm stellte sich während 


des mehrerer Wochen dauern¬ 
den Tests in der Redaktion als zu¬ 
verlässiges Werkzeug heraus. 
Der Test wurde mit dem RS232- 
Interface desselben Anbieters 
wie Teleterm und dem Epson 



CX-21 Akustikkoppler durchge¬ 
führt. Das Handbuch wurde nach 


kurzer Zeit beiseite gelegt. So 
leicht ist Teleterm zu bedienen. 
Betreibt man den Akustikkoppler 
allerdings über eine ältere Ne¬ 
benstellenanlage, kann es Vor¬ 
kommen, daß die Abschirmung 
der Telefonleitungen nicht aus¬ 
reicht. Dies bewirkt, daß durch 
andere Leitungen falsche Zei¬ 
chen eingelesen werden. Dieses 
Manko dürfte allerdings nur sehr 
schwer zu beseitigen sein und 
tritt nicht nur bei dieser Treiber- 


ne Kommunikation erfolgt, wird Die Menüpunkte sind im einzel- 

die Verbindung als beendet an- nen: 

gesehen. Diese Regelung ist not- — Daten empfangen mit Telefon 
wendig, da sonst ein falsch aufge- — Parameter ändern 
legter Telefonhörer ein System — Dateien anzeigen 
über Stunden blockieren könnte. — Dateien ausdrucken 


Software auf. Auf der Nebenstel¬ 
lenanlage unseres Verlages tra¬ 
ten im Testbetrieb jedoch keine 
Probleme dieser Art auf. 


Das Programm Teleterm kostet 
119 Mark. Zu dem selben Preis 
wird von Software Express auch 
ein RS-232-Interface angeboten. 
Dieses Interface ist natürlich 
auch unabhängig von Teleterm 


— Funktionstasten belegen 


Wenn dieser Timeout sehr knapp — Funktionstasten-Übersicht 
eingestellt ist, kann das Abspei- — Vorbereiten von Briefen 
ehern der Kommunikation zum — Dateien löschen 
Abbruch der Verbindung führen. — Ende. 


verwendbar. 


(rg) 
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mail 


electronic 

Die neue Form 


en TT.i.kL, „nd hohen Kosten. 


I mmer deutlicher zeichnet sich ab, 
daß die Computer bald auch die 
Übermittlung von Briefen und Mit¬ 
teilungen einschneidend verändern 
werden. Die großen Computerfir¬ 
men haben schon seit Jahren Syste¬ 
me in Betrieb, mit denen sie dem 
teuren Briefverkehr ausweichen. Es 
handelt sich um Electronic-Maü- 
Systeme, die oft weltweit ausgelegt 
sind und die Mitarbeiter in die Lage 
versetzen, jederzeit und blitzschnell 
miteinander zu kommunizieren. 
Bildschirmterminals und Personal 
Computer werden über Modem 
oder Akustikkoppler ans Telefon¬ 
netz angeschlossen. Ebenfalls ans 
Telefonnetz angeschlossen ist ein 
Zentralcomputer, auf dem ein Mail- 
Box-Programm läuft. Dieses Pro¬ 
gramm richtet den Mitarbeitern 
elektronische Briefkästen und Edi¬ 
tierplätze ein. Benutzerkennum¬ 
mern und Paßwörter ermöglichen 
es den Mitarbeitern, über ihre Ter¬ 
minals und PCs Mitteilungen abzu¬ 
rufen und zu senden, von jedem be¬ 
liebigen kommunikationsfähigen 
Terminal oder PC. Die »Zustellung« 
beziehungsweise Verwaltung der 
Mitteilungen erfolgt im Zentralcom¬ 
puter, der 24 Stunden am Tag an¬ 
sprechbar ist. 

Einige Computerfirmen wie Tan¬ 
dem haben ihr Electronic Mail Sy¬ 
stem den Mitarbeitern über die rein 
betriebliche Anwendung hinaus ge¬ 
öffnet, Die Begeisterung darüber ist 
groß. Neben technischen Fragen 
und Problemlösungen werden be¬ 
triebsintern auch Clubinformatio¬ 
nen oder Gesuche und Angebote 
für zum Beispiel Gebrauchtwagen, 


Wohnungen und ähnliches allen Be¬ 
triebsmitgliedern zugänglich ge¬ 
macht. 

Gegenwärtig sind Electronic- 
Mail-Systeme fast nur bei großen 
Computerfirmen im Einsatz. Termi¬ 
nals, PCs und Modems waren teuer. 
Entsprechende Zentralcomputer 
mit Mailbox-Programm ebenfalls. 
Der rasante technische Fortschritt 
im PC- und Homecomputerbereich 
hat diese Voraussetzungen im letz¬ 
ten Jahr einschneidend verändert. 
Preiswerte Personal und Homecom¬ 
puter sind über oft bereits einge¬ 
baute V.24-Schnittstellen kommuni¬ 
kationsfähig und in großen Stück¬ 
zahlen vorhanden. Neue, integrierte 
Modemchips haben Modems und 
Akustikkoppler in einen Preisbe¬ 
reich gebracht, in dem sie massen¬ 
haft Absatz finden können. 

In den USA und England zeigt 
sich jetzt ein sehr starker Trend zur 
breiten Nutzung von Electronic Mail. 
Zunächst waren es vor allem Unter¬ 
nehmen, die bei Rechenzentren 
Kapazitäten für Electronic Maü an¬ 
mieteten. Inzwischen gibt es auch 
mehrere Firmen, die Electronic 
Mail mit eindrucksvollen Erfolgen 
privaten Home- und Personal Com¬ 
puterbesitzern anbieten. Abrufsoft¬ 
ware und entsprechende Modems 
für die Home- und Personal Compu¬ 
ter sind als preiswerte Paketange¬ 
bote, oft inklusive eines Electronic- 
Mail-Abbonnements, in allen Com¬ 
putershops erhältlich. Da Mailbox- 
Software (für die Zentralstation) in¬ 
zwischen auch für eine Reihe lei¬ 
stungsfähiger PCs preiswert verfüg¬ 
bar ist, gründen immer mehr Privat¬ 
personen und Clubs sogenannte 


Bulletin Boards, kleinere Electronic- 
Mail-Systeme, die in der Regel auch 
als Informationsdatenbanken aus¬ 
gelegt sind. 

Electronic Mail wird sich auch in 
der Bundesrepublik durchsetzen. 
Dies dürfte schneller geschehen, 
als auf den ersten Blick zu erwarten 
ist. Mächtig dazu beitragen wird ein 
neuer Service, den die Bundespost 
mit ungewohnter Geschwindigkeit 
und Innovationsfreude demnächst 
einführt. Es handelt sich um die Te- 
lebox, einen bundesweiten Electro- 
nic-Mail-Service für alle über Aku¬ 
stikkoppler oder Modem kommu¬ 
nikationsfähigen Personal Compu¬ 
ter, portable Computer, Terminals 
und natürlich auch Homecomputer. 

In Mannheim wird ein Telebox- 
Zentralcomputer installiert, der 
über das normale Telefonnetz oder 

über die Datex-Dienste zugänglich 

ist. Geboten wird ein Electronic- 
Mail-System mit beachtlichen Lei¬ 
stungsmerkmalen: 

Jeder Nutzer des Telebox-Systems 
erhält eine eigene Adresse, die ihn 
zusammen mit dem persönlichen 
Paßwort als berechtigten Nutzer des 
Systems ausweist und ihm dadurch 
das Eingeben und Auslesen von Mit¬ 
teilungen im System ermöglicht. 

— Mobilität bei ständiger Erreich¬ 
barkeit. Von jedem beliebigen Ort 
kann sich der Benutzer über die Da¬ 
texnetze oder das Telefonnetz an 
das System anschalten, auch mit ei¬ 
nem transportablen, akustisch ge¬ 
koppelten Datenendgerät, das in 
der Aktentasche mitgeführt und an 
jedem beliebigen Telefon benutzt 
werden kann. Eingegangene Mittei¬ 
lungen werden ausgelesen, eine 
Antwort beziehungsweise eine Mit- 
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teilung abgesetzt oder eine abge¬ 
legte Mitteilung aus dem Speicher 
abgerufen. 

— Einfaches Abspeichern und 
schnelles Wiederauffinden von Mit¬ 
teilungen (elektronischer Akten¬ 
schrank). Der Benutzer kann sich 
Ablagefächer anlegen, die er belie¬ 
big strukturiert und benennt. 

— Editieren und Formatieren von 
Texten. Ein umfangreicher Vorrat an 
Befehlen erleichtert dem Benutzer 
das Erstellen von Texten, die eben¬ 
falls in wiederaufrufbare Dateien 
abgespeichert werden können, 

— Erleichterungen beim Absenden 
und Lesen von Mitteilungen. 

Mit der Angabe von Mehrfach¬ 
adressen läßt sich dieselbe Mittei¬ 
lung in einem Arbeitsgang an meh¬ 
rere Empfänger absenden. 
Adreß-Verteiler können vom Benut¬ 
zer selbst angelegt werden. 

Die Abfrage von Kopfzeilen erleich¬ 
tert die Übersicht, wenn mehrere 
Mitteilungen eingegangen sind. 

Das Weiterleiten von eingegange¬ 
nen Mitteilungen an andere 
Telebox-Adressen mit oder ohne Zu¬ 
setzen von Kommentaren erlaubt ei¬ 
ne rasche Bearbeitung. 

Das Beantworten von eingegange¬ 
nen Mitteilungen ist in vereinfach¬ 
tem Format möglich. 

Die Nutzung der Leistungen von Te- 
lebox kann zu rascherer und effi¬ 
zienterer Information zwischen den 

Partnern führen. Damit ist außer¬ 
dem Zeit- und Kostenersparnis ver¬ 
bunden. 

— Schwarzes Brett; Hier können In¬ 
formationen im System bereitgehal¬ 
ten werden, auf die entweder alle 
Benutzer oder bestimmte Gruppen 
von Benutzern zugreifen können. 
Dabei können Sparten mit beliebi¬ 
gen Namen eingerichtet werden, 
die vom Benutzer gezielt abgefragt 
werden. Informationen, die rasch ei¬ 
nen größeren Empfängerkreis er¬ 
reichen sollen, lassen sich auf diese 
Weise einfach zugänglich machen. 

— Verzeichnisse: Sie erleichtern das 
Herausfinden der Adressen der 
Partner, denen man Mitteilungen zu¬ 
leiten möchte. Es können Kurzna¬ 
men und firmeninterne Bezeichnun¬ 
gen als Referenzadressen festge¬ 
legt werden, die vom System in die 


allgemeinen Adressen umgesetzt 
werden. 

Während bei Bildschirmtext die 
Vorbereitung Jahre in Anspruch 
nahm und die Testphase mit be¬ 
schränkter Teilnehmerzahl drei Jah¬ 
re lief, startet die Telebox praktisch 
aus dem Stand. Im August bis Sep¬ 
tember beginnt ein Teilnehmer-Test- 
Betrieb. Diese Phase wird subven¬ 
tioniert und ist für alle Interessenten 
offen. 

Da preiswerte Akustikkoppler 
und preiswerte Kommunikations¬ 
software für Home- und Personal 
Computer zum Teil schon auf dem 
Markt sind oder nicht mehr lange 
auf sich warten lassen werden, muß 
die Telebox bei jedem Computer¬ 
besitzer Freude aufkommen lassen. 
Was allerdings bisher über die Tele¬ 
box bekannt ist, trübt die Freude et¬ 
was. Zielgruppe der Bundespost 


Die Telebox 


sind hauptsächlich große und mittle¬ 
re Unternehmen, denen die Tele¬ 
box eine verbesserte und preiswer¬ 
tere Kommunikation zwischen Au¬ 
ßendienst und Zentrale bringen soll. 
Bei den langen Laufzeiten und ho¬ 
hen Kosten des normalen Briefver¬ 
kehrs und der Immobilität des Telex 
ist dieses Ziel nicht schwer zu errei¬ 
chen. Mit einer nutzungszeitabhän¬ 
gigen Gebührenstruktur (vermut¬ 
lich 0.30 Mark pro Minute) und ei¬ 
nem monatlichen Mindestbetrag 
(vermutlich 80 Mark) ist der neue 
Service für die private Nutzung mit 
Home- oder Personal Computer zu 
teuer. 

Trotz der für die private Nutzung 
unfreundlichen Gebührenstruktur 
sollten Besitzer von Home- und Per¬ 
sonal Computern und speziell Besit¬ 
zer des C 64 den neuen Service be¬ 
grüßen. So wie die Einführung des 
PC durch die marktstarke IBM das 
Interesse und das Angebot an Per¬ 
sonal Computern verbreiterte, wird 
die Telebox den Weg zu einer Viel¬ 
zahl von Electronic-Mail-Systems 
und Bulletin Boards in der Bundes¬ 
republik ebnen. Bereits jetzt bieten 
private Unternehmen wie Time Sha¬ 
re, Digital Equipment, General Elec¬ 
tric und andere Electronic Mail an, 


natürlich noch für Firmenkunden 
und zu Preisen, die ähnlich liegen, 
wie bei der Telebox. Es werden 
neue Unternehmen auftreten, wel¬ 
che preiswerte, auf große Teilneh¬ 
merzahlen ausgerichtete Electro- 
nic-Mail-Services der Vielzahl von 
Homecomputer- und Personal Com¬ 
puter-Besitzern anbieten werden. 
Technisch und kommerziell gese¬ 
hen sind solche neuen Unterneh¬ 
mungen möglich und attraktiv. Hin¬ 
dernd wirkt sich gegenwärtig nur 
die Rechtsunsicherheit darüber 
aus, ob solche Services auf privater 
Basis zulässig sind. 

Die Post wäre gut damit beraten, 
Wettbewerb zuzulassen. Einmal 
wird ihre Basis an Gebühreneinnah¬ 
men verbreitert, da die Nutzer sol¬ 
cher Services auf alle Fälle das Lei¬ 
tungsnetz der Post in Anspruch neh¬ 
men müssen. Die Nachrichtenver¬ 
mittlung durch den Electronic-Mail- 
Service ist eine zusätzliche Dienst¬ 
leistung, die sich innerhalb der 
Grundstücksgrenzen, sogar inner¬ 
halb des Computers des privaten 
Anbieters vollzieht. Das Monopol 
der Post auf Grundstücksgrenzen 
überschreitende Kommunikation 
wird gar nicht in Frage gestellt, und 
alle Erfahrungen der letzten Jahre 
sprechen dafür, daß private und 
kleinere Unternehmen bessere 
Chancen haben als die Post, innova¬ 
tive Mailbox-Software zu entwickeln 
und zu realisieren. 

Im Bereich des Pakettransports 
konnten (nach einigen rechtlichen 
Schwierigkeiten) neue Unterneh¬ 
men wie UPS, Deutscher Paket¬ 
dienst und Ipec der Post Konkurrenz 
machen. Resultat ist ein wesentlich 
verbessertes Preis/Le istungsver- 
hältnis im Paketdienst. Auch bei der 
Post, die im Wettbewerb jetzt eben¬ 
falls neue Dienstleistungen anbie¬ 
tet. 

Der Bereich der Telekommunika¬ 
tion ist für die zukünftige Entwick¬ 
lung der Volkswirtschaft bestimmt 
nicht weniger wichtig als der des Pa¬ 
kettransports. Gerade bei der Tele¬ 
kommunikation hat die Bundesrepu¬ 
blik viel aufzuholen. Sollte man es 
sich ausgerechnet dann leisten, auf 
die Dynamik des Wettbewerbs und 
das heißt den Erfindungsgeist und 
die Initiative neuer Unternehmen zu 
verzichten? (Hersch Fischler) 
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Dieses Programm ermöglicht es Ihnen, 
über eine RS232-Schnittstelle und Aku¬ 
stikkoppler oder Modem mit anderen 
Computern in Verbindung zu treten. Der 
Austausch von Daten, Nachrichten und 
ganzen Programmen ist möglich - 
ebenso die Abfrage von DatenbagKei 
Wir haben dieses Programm mit der 
Software-Expreß-Schnittsteile und dem 
Epson CX-21-Akustikkoppier getestet 
und waren von Anfang an begeistert. 


& tL, 


D 


as Terminalprogramm 
bietet folgende Möglich¬ 
keiten: 

1. Die mit der Tastatur einge¬ 
gebenen Zeichen werden 
über die RS232-Schnittstelle 

zur Gegenstelle gesandt. 

2. Die von der Gegenstelle 
empfangenen Daten werden 
auf dem Bildschirm ange¬ 
zeigt. 

3. Die von der Gegenstelle 
empfangenen Daten können 
zur weiteren Bearbeitung in 
den »Terminal-Speicher« ge¬ 
schrieben werden. 

4. Diese gespeicherten Da¬ 
ten können dann wieder aus¬ 
gesandt, auf den Bildschirm 
oder Drucker ausgegeben, 
beziehungsweise auf Disket¬ 
te gespeichert werden. 

5. Dateien können von der 
Diskette, zur weiteren Bear¬ 
beitung, in den »Terminal- 
Speicher« geladen werden. 

6. Empfangene und im »Ter¬ 
minal-Speicher« befindliche 
Programme (als ASCII-Datei 


gespeichert) können über ei¬ 
ne »Wandler«-Software auf¬ 
bereitet werden. Hierbei be¬ 
steht eine Kontroll- und Edi¬ 
tiermöglichkeit der einzel¬ 
nen Programmzoilen. 

7. Die Übertragungsparame¬ 
ter sind dem Standard ent¬ 
sprechend eingestellt. 
Durch Änderung der beiden 
CHR$-Befehle in den 
»OPEN«-Anweisungen kön¬ 
nen andere Parameter ein¬ 
gestellt werden. Die entspre¬ 
chenden »OPEN«-Anweisun- 
gen befinden sich in Basic- 
Zeilennummer 10 + 50. Die 
Werte für das Kontroll- und 
Befehlsregister (1. und 2. 
CHR$ Befehl) sind im Com- 
modore Programmier-Hand- 
buch aufgeführt. 

Der »Terminal-Speicher« 
belegt den Adressenbe¬ 
reich Hex 5000-9FFF. 

Der Basic-Speicher endet 
bei Hex 3FFF. 

Das Terminalprogramm 
wird mit Load »terminal«, 8 


10 PRINT"Li EINEN MGMENT BITTE " 

20 F0RX=16384T016995:READY:DS=DS+Y:POKEX 
, Y:NEXT 

30 IFDS068997THENPRINT "FEHLER IN DAT AS: 

SGLL=68997 IST="DS:STOP 
40 P0KE51,0:P0KE52,64:P0KE55,O:P0KE56,64 
:CLR:F=0:GOTO130 

50 P0KE53280,5: P0KE532815 : PRINT"!" 

60 0PEN2,2,0,CHR$<6+32 ) -HOHR*(32+64+1 

28):GET#2,A* 

70 PR INTCHR^ (14): PR I NT " kj" : PR I NT " DA 

ANKDIALOG MIT DEM C64" 

80 SYS16394 

90 CL0SE2: P0KE53280,5:P0KE53281,5:PRIN 
T"H":F=1: G0T0130 

100 OPEN2,2,0,CHR$(6+32 )+CHR$(32+64+ 
128): GET#2 , A*: PR I NT " L," : PR I NT " NEUST ART ! 


110 SYS16416 
120 G0T090 

130 PR INTCHRT {14) : PR I NT » L 
MENUE" 

140 PRINT" HP»!MM 1 = BEDEUTUNG DER FUNKTI 
ONSTASTEN" 

150 IFF=0THEN170 

160 PRINT"KUMW2 = ZURUECK INS TERMINALP 
RGGRAMM":GOTO180 

170 PRINT"EMMU2 = TERMINAL PROGRAMM ST 
ARTEN":GOTO 180 
180 PRINT" BW1 5 = 

CHERTE 

190 PRINT" B»!M 4 = 

CHERTE 

200 PRINT"ITEN" 

210 FRINT" B»ME = 

CHERTE 
220 PRINT"SPEICHERN" 

230 PRINT" [01111 6 = DATEN VON DISK. IN DE 

N SPEICHER SCHREIBEN 

240 PRINT" KWÜI BITTE WAEHLEN 1-6 " 

250 GETA$:IFA$=""THEN250 

260 IFA*="1"THEN340 

270 IFA$="2"ANDF=1THEN100 

280 IFA$="2"THENF=1:G0T050 

290 IFA$="3"THEN520 

300 IFA$="4"THEN570 

310 IFA$="5"THEN650 

320 IFAT-= " 6 " THEN730 

330 G0T0250 


EMPFANGENE UND GESPEI 
DATEN DRUCKEN 
EMPFANGENE UND GESPEI 
PROGRAMME AUFBERE"; 

EMPFANGENE UND GESPEI 
DATEN AUF DISK. "; 
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geladen und anschließend 
mit Run gestartet. Nach einer 
kurzen Wartezeit, während 
der Maschinenspracheteil 
angelegt wird, erscheint das 
Menü auf dem Bildschirm. 

Über das Menü und mit 
Hilfe der Funktionstasten 
werden alle Programmab¬ 
läufe gesteuert. 

Menüpunkt 1 erklärt die 
Bedeutung der Funktionsta¬ 
sten Fl bis F8, der —Taste 
und der RUN/Stop Taste. 
Funktionstaste Fl: 

Durch Betätigung werden 
empfangene Daten als 
ASCll-Datei in den »Termi¬ 
nal-Speicher« geschrieben. 
Ein empfangenes Hex 02- 
Zeichen (Start of Text) be¬ 
wirkt ebenfalls ein Abspei¬ 


chern. Zur Erinnerung än¬ 
dert sich die Rahmenfarbe 
des Bildschirmes in Braun. 
Funktionstaste F3: 

Die Betätigung bezie¬ 
hungsweise ein empfange¬ 
nes Hex 03-Zeichen (End of 
Text) beendet das Abspei¬ 
chern. Die Bildschirm- 
Rahmenfarbe wird wieder 
grün. 

Funktionstaste F5: 

Mit dieser Taste wird an 
den Anfang des »Terminal- 
Speichers« zurückgesetzt 
und die erste Zeile (bis zum 
Return-Zeichen) auf den 
Bildschirm übertragen. 
Funktionstaste F7; 

Ein wiederholtes Drücken 
dieser Taste führt schrittwei¬ 
se bis ans Ende des Textes. 


Das Textende ist durch + + + 
gekennzeichnet. Ein Spei¬ 
cherplatzende wird eben¬ 
falls durch + + + angezeigt. 
Funktionstaste F2: 

Mit dieser Taste wird ein 
Vorschreiben in den »Termi¬ 
nal-Speicher« eingeleitet. 
Die Zeichen werden gleich¬ 
zeitig auf dem Bildschirm an¬ 
gezeigt. Hierbei sind die 
Cursor-Tasten außer Funk¬ 
tion. Falsch eingegebene 
Zeichen können mit der Del- 
Taste gelöscht werden. 
Funktionstaste F4: 

Diese Taste beendet das 
Vorschreiben. 

Funktionstaste F6: 

Durch Betätigung dieser 
Taste wird wieder an den 
Anfang des »Terminal-Spei¬ 


chers« zurückgesetzt. Bis 
zum ersten Return-Zeichen 
werden die Daten über die 
RS232-Schnittstelle ausge¬ 
geben und gleichzeitig auf 
dem Bildschirm angezeigt. 
Funktionstaste F8: 

Ein wiederholtes Drücken 
dieser Taste setzt den Sen¬ 
debetrieb schrittweise bis 
zum Dateiende fort. Das En¬ 
de wird wieder durch + + + 
angezeigt. 

Die —Taste 

Mit dieser Taste wird der 
Rücksprung in das Menü ein¬ 
geleitet. 

Die Run/Stop Taste 

Das Terminalprogramm 
kann mit Run/Stop unterbro¬ 
chen werden. 


340 PRINT"L*MI SMEJBEDEUTUNG DER FUNKT IONS 
TASTEN" 

350 PRINT" KEMUHMF1 = EMPANGENE DATEN SPE 
ICHERN" 

360 PRINT" K»»M F3 = ABSPEICHERN BEENDEN 


370 PR I NT " KSMMF5 
NSEHEN 

3B0 PR I NT *' BS>MMF 7 
NSEHEN 

390 PR I NT *' Bj>1>KF ~2 
400 PRINT"HMMF4 


GESPEICHERTE DATEN A 
( ANFANG )" 
GESPEICHERTE DATEN A 
( WEITER )" 

TEXT VORSCHREIBEN " 
VORSCHREIBEN BEENDEN 


410 PRINT" MWWF 6 = GESPEICHERTE DATEN A 
USSENDEN ( ANFANG )" 

420 PRINT"= GESPEICHERTE DATEN A 
USSENDEN ( WEITER )" 

430 PRINT 11 EMMM WE 1TER MIT RETURN" 

440 GETAi:IFA*=""THEN440 

450 PRINT"L":PRINT" DIE _ TASTE BEWIRK 

T EINEN RUECK- SPRUNG INS MENUE" 

460 PRINT: 

470 PRINT" MIT RUN/STOP KANN DAS PROGR 
AMM ABGEBROCHEN WERDEN":PRINT 

480 PRINT" BEIM VORSCHREIBEN KANN MIT 
DER DEL—TASTE GELOESCHT WERDEN, 

490 PRINT" »»!« WEITER MIT RETURN" 

500 GETA*:IFA*=""THEN500 
510 GOTO130 

520 OPEN1,4,7:REM DRUCKER VC1526 
530 E=PEEK(16387)+PEEK(16388)*256 
540 F0RI=20480T0E—1 
550 PR1NT#1,CHR* <PEEK(I));:NEXT 
560 CLOSEI:GOTO130 

570 PR I NT " LJUUOUHK3AUT0MATISCHES WANDELN O 
DER MANUELLES WANDELN ?" 

580 PR I NT" IfclMBS B ITTE WAEHLEN ( A ODER 
M ) " 

590 PRINT" H>»E»T 1IT RETURN KOMMEN SIE ZU 
RUECK IN DAS MENUE" 

600 GETA$:IFA$=""THEN600 

610 IFA*="A"THENLOAD"WANDLER 2",8:RUN 

620 IFA*="M"THENLOAD"WANDLER",8:RUN 

630 IFA*=CHR*(13)THEN130 

640 G0T0600 

•650 PR I NT " L" : INPUT " UMKßJDATE I NAME "; Dt: P 
RI NT "Li" 

660 PRINT"lMfcMäSDATEI: WIRD AUF 

DISKETTE GESPEICHERT" 


670 CL0SE2:OPEN1,8,2,DS+",S,W" 

680 E=F'EEK (16387) +PEEK (16388) *256 

690 F0RI=20480T0E—1 

700 PRINT#1 , CHR'f (PEEK ( I) ) ; : NEXT 

710 PR INT " Li" : PRI NT " »»»»D ATEN SIND AUF 

DISKETTE GESPEICHERT":FOR1=1T02000:NEXT 

720 CLOSEI:GOTO130 

730 PR INT "Lj" : INPUT " OTMKBT DATEINAME" ; D$: P 
RINT"L" 

740 OPEN1,8,2,D*+",S,R":1=20480 
750 PRINT"||*MUBSgDATEI: ";D$;" WIRD VON 
DISKETTE GELADEN" 

760 GETttl,A* 

770 POKEI,(ASC(A*)):1=1+1 

780 IFST=64THENCL0SE1:G0T0810 

790 I FST< >0THENCL0SE 1: PR I NT " L»»»I DISKSTA 

TUS ";ST;"!":FOR I=1TG5000:NEXT:GOTO130 

800 GOTQ760 

810 POKE16387,(I-INT(I/256>*256):P0KE163 
88,(1/256):GOTO130 

820 DATAO,0,0,0,0,0,0,0,0,0,169,0,141,1, 

64,141,3,64,141,4,64,133,251,169 

830 DATA80,133,252,169,194,141,5,64,32,2 

28,255,201,0,240,85,201,20,240,3 

840 DATA76,49,64,169,8,234,201,3,240,126 

,201,133,240,125,201,134,240,124 

850 DATA201,135,240,123,201,136,240,122, 

201,137,240,121,201,138,240,120,201 

860 DATA139,240,119,201,140,240,118,201, 

95,240,117,201,65,144,23,176,0,201 

870 DATA96,176,3,76,109,64,201,192,176,8 

,76,116,64,105,32,76,116,64,233,128 

880 DATA32,90,66,234,234,234,234,234,32, 

134,240,201,0,240,157,201,13,240 

890 DATA17,201,2,240,43,201,3,240,42,201 

,32,144,233,201,128,176,229,234,201 

900 DATA65,144,16,176,1,23 *,201,96,176,7 

,24,105,128,76,172,6-t .234,233,32 

910 DATA72, 32,20 ,255,76,220,64,76,88,66 

,76,2^2,64,76,54,65,76,190,65,76 

92v 0ATAi96,ö5,76,65,65,76,54,65,76,2,66 

,76,11,66,76,51,65,0,0,0,169,1,141 

930 DATA1,64,76,32,64,169,1,205,1,64,240 

,12,104,24,72,169,245,141,32,208 

940 DATA104,76,32,64,104,72,169,249,141, 

32,208,104,32,0,65,76,32,64,0,0,0 

950 DATA160,0,145,251,230,251,208,2,230, 

252,24,165,251,141,3,64,201,255,240 

960 DATA7,165,252,141,4,64,24,96,165,252 
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Menüpunkt 2 startet das 
eigentliche Terminalpro¬ 
gramm. Zum Datenaus¬ 
tausch ist hinzuzufügen, daß 
einige Steuerzeichen ausge¬ 
filtert werden, um ein ein¬ 
wandfreies Arbeiten mit an¬ 
deren Datenbanken zu er¬ 
möglichen. Weiterhin wird 
eine Code-Wandlung zwi¬ 
schen CPM und ASCII 
durchgeführt. Beim Betäti¬ 
gen der Del-Taste wird ein 
Backspace (ein Zeichen zu¬ 
rück) zur Gegenstelle ge¬ 
sandt. Da die Cursor-Steu¬ 
ertasten ihre Funktion verlo¬ 
ren haben, wurde auf die An¬ 
zeige des Cursors verzichtet. 

Menüpunkt 3 bewirkt die 
Ausgabe der im »Terminal- 
Speicher« befindlichen Da¬ 
ten auf einen angeschlosse¬ 
nen Drucker 


»Terminalprogramm« 

(Ende) 


Menüpunkt 4 verläßt das 
Programm und lädt das 
»Wandler-Programm«. Mit 
diesem »Wandler« ist es mög¬ 
lich, ein empfangenes und 
im »Terminal-Speicher« ab¬ 
gelegtes Programm (als 
ASCII-Datei) in ein lauffähi¬ 
ges Programm zu wandeln 
und in den Basic-Speicher zu 
schreiben. Es kann dann be¬ 
nutzt oder auf Diskette ge¬ 
speichert werden. Das 
»Wandler-Programm« startet 
selbstätig und auf dem Bild¬ 
schirm erscheint: ready. 
».Erste Programmzei¬ 
le.«run 60020. Der Cursor 

blinkt in der ersten Pro¬ 
grammzeile. Sind in dieser 
Zeile keine Fehler vorhan¬ 
den, so kann diese durch Be¬ 
tätigen der Return-Taste in 
den Basic-Arbeitsspeicher 


übernommen werden. Jetzt 
steht der Cursor in der Zeile 
»run 60020«. Ein nochmaliges 
Drücken der Return-Taste 
bringt die nächste Pro¬ 
grammzeile auf den Bild¬ 
schirm. In gleicher Weise 
kann bis zum Programmen¬ 
de fortgefahren werden. Ist 
die Änderung einer Pro¬ 
grammzeile erforderlich, so 
kann dieses mit den übli¬ 
chen Editiermöglichkeiten 
geschehen. Soll eine Zeile 
nicht übernommen werden, 
so wird der Cursor manuell 
in die Zeile »run 60020« ge¬ 
steuert und mit )Return( wei¬ 
tergearbeitet. Zu beachten 
ist, daß die Programmzeile 
nicht länger als 80 Zeichen 
ist. Der Menüpunkt 4 bietet 
zusätzlich eine Auswahlmög¬ 
lichkeit zwischen »automati¬ 


scher Wandlung« und »ma¬ 
nueller Wandlung«. Die »ma¬ 
nuelle Wandlung« wurde be¬ 
schrieben. Bei der »automa¬ 
tischen Wandlung« läuft das 
Programm selbstätig ab. 
Wird aber eine fehlerhafte 
Zeile erkannt, so bricht das 
Programm ab. Nach der Edi- 
tierung kann mit »run 60020« 
weitergearbeitet werden. 

Menüpunkt 5 speichert al¬ 
le im »Terminalspeicher« be¬ 
findlichen Daten als sequen¬ 
tielle Datei auf eine Diskette. 
Vor dem Abspeichern muß 
der Datei-Name eingege¬ 
ben werden. 

Menüpunkt 6 lädt eine se¬ 
quentielle Datei von der Dis¬ 
kette in den »Terminal-Spei¬ 
cher«. 


Soll ein Basic-Programm 
zur Gegenstelle gesandt 
werden, so sind einige Be¬ 
sonderheiten zu beachten. 

1. Das Programm sollte nur 
»reine ASCII-Daten« erhal¬ 
ten. Bildschirm-Steuerzei¬ 
chen sowie Grafikzeichen 
werden nicht übertragen. 

2. Das Programm muß als se¬ 
quentielle Datei vorliegen 
und nicht wie sonst üblich als 
Programm-Datei. 

Die Wandlung einer Pro¬ 
gramm-Datei in eine sequen¬ 
tielle Datei wird folgender¬ 
maßen durchgeführt. 

1. Das Programm wird wie 
üblich mit LOAD »NAME«, 8 
in den Basic-Speicher des C 
64 geladen. 

2. Im Direktmodus wird fol¬ 
gende Zeile eingegeben: 
OPEN 

l,8,2,»Name,S,W«:CMDl:LIST 
Jetzt wird das Programm 
als sequentielle Datei auf die 
Diskette geschrieben und 
kann später vom Terminal¬ 
programm aufgerufen wer¬ 
den. Anschließend wird mit 
CLOSE 1 das eröffnete File 
geschlossen. 

(Manfred Wyrwas) 


In der nächsten Ausgabe 
das entsprechende Trei¬ 
ber-Programm für den 
VC 20. 


,141,4,64,201,159,240,2,24,76,169 

970 DATA42,32,210,255 ,32,210,255 , 3? :10, 

255,198,251,96,0,0,169,0,141,1,64 

980 DATA76,32,64,0,0,0,169,1,141,1,64,32 

,228,255,201,0,240,249,201,13,240 

990 DATA24,201,20,240,20,201,32,144,237, 

201,145,240,233,201,157,240,229,201 

lOOO DATAl47,240,225,201,138,240,28,32,2 

10,255,201,20,240,3,76,127,65,198 

1010 DATA251,208,2,198,252,24,76,70,65,0 

,O,32,0,65,76,70,65,76,54,65,0,0,0 

1020 DATAO,O,169,0,133,251,169,80,133,25 

2,165,252,205,4,64,240,3,76,174,65 

1030 DATA165,251,205,3,64,240,3,76,174,6 

5,24,76,215,65,0,160,0,177,251,230 

1040 DATÖ251 7 208,2 T 230,252,24,234,234,23 

4,234,96,32,141,65,32,210,255,32,149 

1050 DATA65,32,210,255,201,13,240,3,76,1 

96,65,76,32,64,0,0,0,32,38,65,169 

1060 DATA13,96,0,0,0,201,65,144,23,176,0 

,201,96,176,3,76,244,65,201,192,176 

1070 DATA8,76,251,65,105,32,76,251,65,23 

3,128,32,90,66,96,0,0,0,32,141,65 

1080 DATA32,210,255,32,224,65,32,149,65, 

32,210,255,32,224,65,201,13,240,185 

1090 DATA76,11,66,76,32,64,0,201,65,144, 

23,176,0,201,96,176,3,76,51,66,201 

1100 DATA192,176,8,76,58,66,105,32,76,62 

,66,233,128,32,210,255,96,233,31,76 

1110 DATA58,66,0,32,141,65,32,31,66,32,1 

49,65,32,31,66,201,13,240,3,76,74 

1120 DATA66,96,96,0,133,158,32,8,242,96, 

96,0,0,0 

READY. 
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Modem: Das Modem stellt die Ver¬ 
bindung zwischen Ihrem Computer 
und dem Telefonnetz her. Es wird 
von der Post direkt an das Telefon¬ 
netz angeschlossen. Das Modem 
wandelt die Ausgabesignale des 
Computers m elektrische Signale 


Q4€R OHL 


Vollduplex: Bei dieser Art der Daten¬ 
übertragung sendet der Computer, 
an den man die eigenen Daten über¬ 
tragen hat, diese Daten zurück, da¬ 
mit der eigene Computer sie auf kor¬ 
rekte Übermittlung überprüfen 
kann. Stimmen diese Daten überein, 
so wird mit der Übertragung fortge¬ 
fahren. Ist die Übereinstimmung 
nicht gegeben, so werden diese Da- 


Start/Stop-Bits: Bei jeder Start-Stop- 
Übertragung wird jedem n-ten Bit je¬ 
weils ein Bit voran- und nachgesetzt, 
Das vorangesetzte Bit wird Start-Bit 
genannt, das nachgesetzte wird als 
Stop-Bit bezeichnet. 

Treibersoftware: Mit Treibersoftware 
wird das Programm bezeichnet, das 
die Kommunikation des Computers 
mit dem Modem steuert. Komforta¬ 
ble Versionen der Treibersoftware 
haben Zusatzfunktionen, die zum 
Speichern oder Drucken der gesen- 


um, die über das Telefonnetz über¬ 
tragen werden können. 

Akustikkoppler: Der Akustikkoppler 
hat dieselben Funktionen wie das 
Modem. Er wird aber nicht wie das 
Modem direkt an das Telefonnetz 
angeschlossen. Der Akustikkoppler 
verbindet den Computer mit dem 
Hörer eines herkömmlichen Tele¬ 
fonapparates. Der Akustikkoppler 
sendet akustische Signale, die vom 
Telefonapparat in elektrische Im¬ 
pulse umgewandelt werden, und 
empfängt akustische Signale, die er 
für den Computer in elektrische Im¬ 
pulse umwandelt. 

Handshaking: Handshaking bedeutet 
die Steuerung der Datenübertra¬ 
gung durch Stopp-, Sende-und Emp¬ 
fangssignale. Die Datenübertra¬ 
gung wird erst dann fortgesetzt, 
wenn der korrekte Empfang bestä¬ 
tigt wurde. 


ten emeut gesendet. 

Halbduplex: Im Halbduplex-Betrieb 
sendet der empfangende Compu¬ 
ter nur eine Bestätigung des Emp¬ 
fangs. 

Baud-Rate: Mit diesem Begriff wird 
die maximale Übertragungsge¬ 
schwindigkeit bezeichnet. Die 
Baud-Rate wird in BPS (Bits pro Se¬ 
kunde) angegeben. 

Paritätsbit: Die Paritätskontrolle ist 
ein Hilfsmittel zur Datensicherung. 
Dabei wird einer einheitlich langen 
Folge von Informationsbits ein zu¬ 
sätzliches Bit hinzugefügt. Der Wert 
dieses Bits wird nach Vereinbarung 
so gewählt, daß mit ihm die Anzahl 
der Bits mit dem Wert binär Eins 
über die gesamte Einheit hinweg 
stets einen geraden oder stets einen 
ungeraden Wert erreicht. Es wird 
dann von gerader oder ungerader 
Parität gesprochen. 


deten und empfangenen Daten die¬ 
nen. 

Mallbox: Bei einer Mailbox handelt 
es sich um eine Datenbank, in die 
Nachrichten geschrieben oder aus 
der Nachrichten gelesen werden 
können. 

Answer/Originate: Wenn Sie mit einem 
Netz Verbindung aufnehmen, rufen 
Sie das System an. Da der Ruf von Ih¬ 
nen ausgeht, muß Ihr Modem auf 
»Originate« gesetzt werden. Da¬ 
durch wird das »Einführungsproto¬ 
koll« in Gang gesetzt, Wenn Sie mit 
einem anderen Computer kommu¬ 
nizieren, muß einer im »Originate«- 
und der andere im »Answer«-Modus 
sein. Wenn die Verbindung aufge¬ 
baut ist, ist es nicht mehr von Bedeu¬ 
tung, welcher von beiden in wel¬ 
chem Modus ist. 

(rg) 
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Wie bedient man eine Mailbox? 


V orweg die rechtliche Frage: Die 
Benutzung eines Akustikkopp¬ 
lers, um in eine Mailbox einzu¬ 
steigen, ist völlig legal. Es wird sogar 
erwartet. Denn genau zu diesem 
Zweck wurden Mailboxen geschaf¬ 
fen. Eine Mailbox ist im Prinzip 
nichts anderes als eine Datenbank 
oder eine Datei, in die Nachrichten 
eingegeben und abgerufen werden 
können. Jeder Besitzer eines Akus¬ 
tikkopplers ist dazu in der Lage. 
Welche Geräte sind notwendig? 

Die zur Kommunikation notwendi¬ 
gen Geräte sind schnell zusammen¬ 
gestellt. Neben dem C 64/VC 20 be¬ 
nötigen Sie eine V.24-Schnittstelle. 
Sie wird in den User-Port des Com¬ 
puters gesteckt. Ein geeignetes Ka¬ 
bel verbindet den Akustikkoppler 
mit dem Interface. Das wäre alles. 
Jetzt fehlt nur noch die Software. Eine 
Möglichkeit ist das in diesem Heft 
abgedruckte Programm. Aber es 
gibt schon mehrere Programme, die 
diese Aufgabe erfüllen. Jeder Com¬ 
putertyp braucht seine auf ihn abge¬ 
stimmte Software. Wenn Sie diese 
Geräte und das Programm haben, 
kann es losgehen. 

Kein Anschluß ohne Nummer 


Zwei Probleme müssen noch be¬ 
wältigt werden: In der Nähe des 
Computers muß ein Tfelefonan- 
schluß verfügbar sein. Ohne Telefon 
geht es nun mal nicht. Doch was nützt 
die beste Bedienunasanleitung des 
Akustikkopplers, wenn sie keine 
Rufnummer enthält, unter der eine 
Mailbox erreichbar ist. Aber ab so¬ 
fort ist auch diese Schwierigkeit be¬ 
hoben. Ich werde Ihnen noch einige 
Telefonnummern geben, die Sie ein¬ 
mal ausprobieren sollten. 

Der erste Kontakt 

Anhand eines Beispiels möchte 
ich mit Ihnen eine Mailbox anwäh¬ 
len. Ich habe ein geeignetes Pro¬ 
gramm in den Computer geladen. 
Nach dem Starten steht mir ein Me¬ 
nü zur Verfügung, aus dem man eine 
Anzahl von Funktionen wählen kann. 
Ich wähle die Funktion »Daten la¬ 
den«. Sie stellt die Aufnahmebereit¬ 
schaft her. Die jetzt folgende Frage 
»Sollen die Daten auf Diskette ge¬ 
speichert werden?« beantworte ich 
mit »Ja«, denn ich möchte mir nach¬ 
her alles ausdrucken lassen. Und 
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jetzt wird es langsam spannend. Auf 
dem Monitor ist nichts mehr zu se¬ 
hen. Aber ich weiß, was ich zu tun 
habe. Ich nehme den Telefonhörer 
in die Hand und wähle 061545 
1433. Das ist die Nummer von DE- 
CATES, eine aus der langsam stei¬ 
genden Anzahl von Mailboxen in 
Deutschland. Ein kurzer Blick auf 
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den Akustikkoppler — die Betriebs¬ 
lampe leuchtet. Alles ok. Leider 
meldet das Telefon das Besetztzei¬ 
chen. Damit muß man immer rech¬ 
nen. Also noch einmal. Diesmal 
klappt es. Ein hoher Pfeifton sagt 
mir, daß die Verbindung hergestellt 
ist. Schnell lege ich den Hörer auf 
den Akustikkoppler. Gespannt war¬ 
te ich auf die ersten Zeichen. Nach 
ein paar Sekunden tut sich etwas. 
Die ersten Zeichen laufen mit der für 
300 Baud typischen, langsamen Ge¬ 
schwindigkeit über den Bildschirm. 
Ein erstes Bild teilt mir mit, daß ich 
mit DECATES verbunden bin. 
Gleichzeitig werde ich nach mei¬ 
nem Paßwort gefragt. Ich gebe es 
ein und sofort kommt die Bestäti¬ 
gung, daß ich eingetragener Benut¬ 
zer bin. 

Als Anfänger werden Sie noch 
kein Paßwort besitzen. Aber keine 
Angst. Wer noch kein Paßwort be¬ 
sitzt, braucht nur RETURN zu 
drücken. 

Als eingetragener Benutzer bin 
ich in der Lage, persönliche Mittei¬ 
lungen abzurufen, die nur für mich 
bestimmt sind. Kein anderer kann 
diese Infos lesen. Jeder andere Be¬ 
nutzer kann jedoch jedem anderen 
Mitteilungen zukommen lassen und 
auch jede öffentliche Information 
entgegennehmen. 

Die dann folgende Frage von DE¬ 
CATES nach der Bedienungsanlei¬ 
tung sollten Sie ruhig mit Ja beant¬ 
worten, solange Sie sich mit diesem 
System nicht auskennen. Laut DE¬ 
CATES gibt es etliche Anrufer, die 
am Ende nicht mehr wissen, wie sie 
wieder aus dem System herauskom¬ 
men (nämlich indem man LOGOFF 
eingibt). Die meisten Bedienungs¬ 
fehler werden jedoch mittlerweile 
abgefangen. Der Rest geht automa¬ 
tisch. Und wie gesagt, die Bedie¬ 
nungsanleitung sollten Sie am An¬ 
fang immer neben sich liegen ha¬ 
ben. Sie können dadurch Telefonko¬ 
sten sparen, 

Viele Mailboxen lassen folgende 
Funktionen zu: 

Informationen eingeben, Informa¬ 
tionen anzeigen; eine Art Fundgru¬ 
be für Hard- und Softwaretausch ist 
oft auch vorhanden. Bei einigen 
Mailboxen existiert zusätzlich noch 
ein Informationssystem für Gewer¬ 
betreibende. Dort haben »gewöhnli¬ 
che« Anrufer keinen Zugriff. 
Probieren Sie die Mailboxen ruhig 
einmal aus. Weitere Nummern fin¬ 
den Sie in den abgedruckten Auszü¬ 
gen aus einer Verbindung mit DE¬ 
CATES, Doch vergessen Sie nicht 

die Telefonrechnung. , s 

(gk) 
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F orth wurde Anfang der siebziger 
Jahre von Charles H. Moore ent¬ 
wickelt und ursprünglich zur 
Steuerung von Radioteleskopen ein¬ 
gesetzt. Die Sprache entstand dabei 
ganz gezielt als Alternative zur 
fehleranfälligen und schlecht zu 
wartenden Assemblerprogrammie¬ 
rung auf der einen Seite und den 
klassischen Compilersprachen wie 
Fortran oder Algol auf der anderen 
Seite, die für Prozeßsteuerungen zu 
langsam und zu aufwendig waren. 

Forth wurde übrigens damals als 
sogenannte »Programmiersprache 
der vierten Generation« entwickelt 
und sollte eigentlich dementspre¬ 
chend den Namen »Fourth« tragen. 
Leider war die IBM 1130, auf der 
Forth zum ersten Mal implementiert 
wurde, noch ein Rechner der »drit¬ 
ten Generation« und erlaubte nur 
Dateinamen bis maximal fünf Zei¬ 
chen. Charles Moore mußte 
»Fourth« daher um einen Buchsta¬ 
ben kürzen, und das war die Ge¬ 
burtsstunde von Forth. Lange Jahre 
fristete die Sprache ein Schattenda¬ 
sein in diversen Forschungsstätten, 
ehe sie mit dem Aufkommen der 
Mikrocomputer eine größere Ver¬ 
breitung auch unter Privatleuten 
fand. 

Was ist Forth? 

Forth ist interaktiv. Ähnlich wie in 
Basic können Programme also im 
Dialog mit dem Computer ent¬ 
wickelt und getestet werden. Das ist 
ein wesentlicher Unterschied zu 
den klassischen Compilersprachen 
wie zum Beispiel Pascal oder Fort¬ 
ran. Ein Compiler erwartet nämlich 
ein fertiges Programm, das er dann 
in einem Arbeitsgang übersetzt. Es 
gibt keine Möglichkeit, die Wirkung 
bestimmter Kommandos vor der 
Übersetzung zu testen. Anders bei 
Forth. Hier kann man im Direktmo¬ 
dus Rechnungen durchführen, Pro¬ 
grammteile testen und neue Be¬ 
fehlsworte definieren. 

Forth ist strukturiert. Es gibt in 


Befehl: 


3 

5 

+ 

2 

* 



TOS 

3 

5 

8 

2 

16 

? 

(1) 

? 

3 

? 

8 

? 

? 

(2) 

? 

? 

? 

? 

? 

? 

(3) 

? 

? 

? 

? 

? 
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Stackinhalt nach Ausführung 
des Befehls 


Bild 1. Die Stapelveränderungen während der Aus¬ 
führung einer einfachen Befehlsfolge. Die Operatio¬ 
nen »+« und »*« verknüpfen jeweils die beiden 
obersten Elemente des Stacks miteinander und le¬ 
gen das Ergebnis wieder ab. Mit ».« wird der TOS 
ausgedruckt und steht danach nicht mehr zur Verfü¬ 
gung. 

Forth selbst mit Gewalt keine Mög¬ 
lichkeit, Basic-ähnlichen Spaghetti- 
Code zu erzeugen. Der Grund dafür 
ist sehr einfach: Es gibt keine 
GOTO-Befehle und auch keinen Er¬ 
satz dafür. Jede Wort-Definition ist in 
sich abgeschlossen und am ehesten 
noch mit den Prozeduren in Pascal 
zu vergleichen. 

Forth ist schnell. Alle Anweisun¬ 
gen werden zuerst compiliert und 
dann ausgeführt, was insbesondere 
bei Programmschleifen große Zeit¬ 
vorteile bringt. Forth-Programme 
sind daher in der Regel um Größen¬ 
ordnungen schneller als entspre¬ 
chende Basic-Programme. 

Forth ist erweiterbar. Im Gegen¬ 
satz zu den meisten anderen Pro¬ 
grammiersprachen kann der Benut¬ 
zer in Forth neue Sprachelemente 
definieren, ja Programmierung in 
Forth besteht gerade in der Defini¬ 
tion neuer Worte zur Erweiterung 
des Sprachumfangs. 


Namensfeld 

Link Feld 

Code Feld 


Parameter Feld 

Namensfeld 

Link Feld 

Code Feld 

Parameter Feld 

Namensfeld 

Link Feld 

Code Feld 


Parameter Feld 



Wort n 


Wort n + 1 


Wort n + 2 


Bild 2. Vereinfachte Darstellung des Forth- 
Wörterbuchs im Speicher. Das Namensfeld enthält 
den Wortnamen, das Codefeld beinhaltet Information 
über die Art des folgenden Parameterfeldes, das die 
Definition des Wortes enthält. Ein Wort kann als 
Maschinenspracheabschnitt, als Variable oder Kon¬ 
stante oder - der häufigste Fall - durch andere 
Befehlsworte definiert sein (Colon-Definition). Das 
Link-Feld schließlich verkettet die Wortdefinitionen in 
Forth zu einer Liste, die bei der Interpretation oder 
Compilation von Worten durchsucht wird. 

Jeder Basic-Programmierer wird 
erfreut zur Kenntnis nehmen, daß in 
Forth keine Fehlermeldung »SYN¬ 
TAX ERROR« existiert — und zwar 
ganz einfach deswegen, weil die 
Forth-Syntax so einfach ist, daß kei¬ 
ne solchen Fehler Vorkommen kön¬ 
nen. Ein Wort in Forth besteht aus ei¬ 
ner beliebigen Zeichenfolge, die al¬ 
lerdings kein Leerzeichen enthalten 
darf, weil dieses gerade zwei Worte 
trennt. Zum Beispiel sind gültige 
Forth-Wörte 

HALLO, 3FACH, %X!, +1NOCH- 

UND-DANN-SCHLUSS. 

Eine Eingabezeile besteht nun 
einfach aus Worten und Zahlen. Bei 
Zahlen ist übrigens noch eine Be¬ 
sonderheit zu beachten: Forth kann 
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in beliebigen Zahlensystemen rech¬ 
nen. Die Systemvariable BASE ent¬ 
hält die jeweils gültige Zahlenbasis. 
In der Regel wird man entweder im 
Dezimal- oder im Hexadezimalsy¬ 
stem arbeiten. Daher kennt Forth 
zwei spezielle Befehlsworte zum um¬ 
schalten in das jeweilige Zahlensy¬ 
stem, nämlich DECIMAL und HEX. 

Programmierung in Forth besteht 
nun einfach darin, mittels bereits de¬ 
finierter Worte wiederum neue Wor¬ 
te zu bilden. Ein Grundvokabular 
von vordefinierten Worten, das so¬ 
genannte Forth-Kernal, steht dem 
Benutzer dabei von Anfang an zur 
Verfügung. 

Bevor wir näher auf die Program¬ 
mierung eingehen, müssen wir uns 
zuerst noch mit einer weiteren Be¬ 
sonderheit von Forth auseinander¬ 
setzen, dem Stack. Forth arbeitet 
nämlich in umgekehrter polnischer 
Notation (UPN). Wesentliches Merk¬ 
mal dieser Methode, die Benutzern 
von Hewlett-Packard-Taschenrech- 
nern nicht unbekannt sein dürfte, ist 
ein Datenstack, auf dem alle Zahlen¬ 
werte gespeichert werden, bevor 
mit einem Operator auf sie zugegrif¬ 
fen wird. Um zum Beispiel den Wert 
des Ausdrucks 2*(3 + 5) zu berech¬ 
nen, würde man in Basic einfach 
schreiben 

PRINT 2*(3+5) 

Dieselbe Berechnung in Forth lau¬ 
tet (Bild 1): 

3 5 + 2*. (man beachte den 
Punkt!) 

Die Berechnung geht also genau¬ 
so vor sich, wie man auch im Kopf 
rechnen würde: Zunächst nimmt 
man die beiden Zahlen in der Klam¬ 
mer, weil diese zuerst berechnet 
werden. Dann werden die Zahlen 

addiert, schließlich holt man sich 
die »2« und multipliziert sie mit dem 
ersten Zwischenergebnis. Forth legt 
also generell erst die für einen Be¬ 
fehl benötigten Operanden auf den 
Stack, und der Befehl greift an¬ 
schließend darauf zu. Das gilt nicht 
nur für arithmetische Operationen, 
sondern ist ein Kennzeichen für die 
gesamte Sprachstruktur von Forth. 
Nehmen wir etwa den Punkt am En¬ 
de der Beispielrechnung oben. Er 
ist das Forth-Äquivalent zum PRINT- 
Befehl in Basic. 

Beachten Sie bitte, daß der PRINT- 
Befehl immer vor den auszu¬ 
druckenden Daten steht, der Punkt 
in Forth jedoch immer dahinter. Mit 
dem Punkt-Befehl wird stets der 
oberste Zahlenwert auf dem Stack 
ausgedruckt. Der wesentliche Un¬ 
terschied zu anderen Programmier¬ 
sprachen, wie zum Beispiel Basic, 

34 


liegt nun darin, daß der Operand 
zum Zeitpunkt des Erreichens des 
Punkt-Befehls bereits bekannt ist. 
Der Basic-Interpreter, der auf einen 
PRINT-Befehl stößt, weiß zu diesem 
Zeitpunkt ja noch gar nicht, was er 
ausdrucken soll. Also muß die Infor¬ 
mation, daß gedruckt werden soll, 
irgendwo abgespeichert werden. 
Basic und alle anderen höheren Pro¬ 
grammiersprachen bedienen sich 


MOD 

Addition 

Subtraktion 

Multiplikation 

Division 

Divisionsrest 

/MOD 

Rest uiid „ 

MAX 

Ergebnis bei D 

l 

Maximalwert 


Minimalwert , 

ABS 

Absolutwert 

MINUS 

Vorzeichen- 

AND 

Logisches UND 

OR 

Logisches ODER 

XOR 

Logisches 

ODER 

< 

EXCLUSIV 

Test ob kleiner 

> 

Test ob größer 

= 

Test ob aleich 

0< 

Test ob negativ 

0= 

Test ob Null 


Tabelle 1. 


und logi¬ 
schen Befehle 
in Forth 


dazu eines internen Stacks, der ähn¬ 
lich wie der Datenstack von Forth 
konstruiert ist. 

Letzten Endes liegt Usu der Unter¬ 
schied zwischen Forth und anderen 
Sprachen darin, daß alle anderen 
Sprachen den vorhandenen Stack 
vor dem Benutzer verheimlichen 
und zu diesem Zweck natürlich zu¬ 
sätzlichen Verwaltungsaufwand trei¬ 
ben müssen, was die Verarbeitung 
nicht gerade beschleunigt. 

Da Forth mit einem Datenstack ar¬ 
beitet, funktionieren alle eingebau¬ 
ten und selbstdefimerten Funktio¬ 
nen nach dem gleichen Schema: 

Die Funktion holt sich die benötigten 
Parameter vom Stack, führt die not¬ 
wendigen Berechnungen durch 
und legt das Ergebnis wieder auf 
den Stack. Dadurch können Funk¬ 
tionsaufrufe beliebig geschachtelt 
werden. Eine Übersicht über die 
wichtigsten numerischen Funktio¬ 
nen in Forth gibt Tabelle 1. 

Da der Stack bereits für die lau¬ 
fenden Rechnungen benötigt wird, 
ist es einigermaßen umständlich, 
ihn auch noch für die Speicherung 
von Daten zu verwenden. Forth 
kennt daher die beiden Befehlswor¬ 
te VARIABLE und CONSTANT, die 
zur Definition von Variablen bezie¬ 
hungsweise Konstanten benutzt wer¬ 
den. Mit 4 CONSTANT VIER wird 
zum Beispiel eine Konstante mit Na¬ 
men VIER und Wert 4 angelegt, auf 
die im weiteren Verlauf immer wie¬ 
der zurückgegriffen werden kann. 


Wann immer Forth jetzt auf das Wort 
VIER stößt, wird die Zahl 4 auf den 
Stack gelegt. 

Bei Variablen ist die Situation et¬ 
was komplizierter. Sei eine Variable 
TEST mit Anfangswert 1 definiert 
worden durch 1 VARIABLE TEST. 
Wenn jetzt wieder das Wort TEST 
auftaucht, wird nicht der Inhalt der 
Variablen, sondern deren Adresse 
auf den Stack gelegt. Mit zwei sehr 
häufig gebrauchten Befehlen kann 
man nun auf diese Adresse zugrei¬ 
fen: Es sind dies die Befehle»!«(ge¬ 
sprochen »Store«) und »@« (gespro¬ 
chen »Fetch«). Der Befehl »!« spei¬ 
chert den Zahlenwert, der an zwei¬ 
ter Stelle auf dem Stack liegt, an die 
Adresse, die durch das oberste Ele¬ 
ment des Stapels (TOS = Top of 
Stack) gegeben ist. Beide Zahlen¬ 
werte werden dabei vom Stack ent¬ 
fernt. Die Wirkung ist analog zum 
POKE-Befehl in Basic, operiert aber 
mit 16-Bit-Worten statt mit einzelnen 
Bytes. 2 840 ! entspricht also POKE 
840,2:POKE 841,0 in Basic. Ebenso ist 
840 @ in Forth analog zur Basic- 

Funktion PEEK(840) + 256*PEEK 
(841). Sollen tatsächlich nur einzelne 
Bytes gespeichert und gelesen wer¬ 
den, bedient man sich der Worte 
»C!« und »@«. 1 840 C! entspricht PO¬ 
KE 840,1 in Basic und 840 C @ ent¬ 
spricht PEEK(840). 

Nun sollte auch das Arbeiten mit 
Forth-Variablen klar sein: Bei jedem 
Auftreten eines Variablennamens 
legt Forth die Adresse dieser Varia¬ 
blen auf den Stack. Um zum Beispiel 
einer Variablen TEST den Wert 7 zu¬ 
zuweisen, schreibt man in Forth 

7 TEST! 


Neue Worte definieren 


Danach ist die Zahl 7 und auch die 
Adresse von TEST vom Stack ver¬ 
schwunden. Benötigt man die Zahl 
jedoch noch für weitere Rechnun¬ 
gen, muß sie vor der Zuweisung an 
die Variable zunächst dupliziert 
werden. Hierzu dient das Wort DUP, 
welches ein Duplikat des TOS er¬ 
zeugt. DUP ist eine sehr häufig be¬ 
nutzte Funktion, da alle Forth- 
Befehle die Parameter vom Stack 
entfernen. Will man zum Beispiel 
das Zwischenergebnis einer länge¬ 
ren Rechnung mit dem Befehl ».« 
ausdrucken, dann muß es zunächst 
mit DUP dupliziert werden, da es 
durch ».« vom Stack gelöscht wird 
und somit für weitere Rechnungen 
nicht mehr zur Verfügung steht. 

Forth hat die bemerkenswerte Ei¬ 
genschaft, daß der Sprachumfang 
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beliebig erweitert werden kann. 
Zwei Möglichkeiten zur Schaffung 
neuer Worte haben wir ja schon ken¬ 
nengelernt: CONSTANT und VA¬ 
RIABLE. Daneben gibt es noch eine 
Reihe weiterer sogenannter Defini¬ 
tionsworte. Zum Beispiel können mit 
CREATE neue Forth-Worte direkt als 
Maschinenspracheroutinen defi¬ 
niert werden (sogenannte »Primiti¬ 
ves«), Man wird davon allerdings nur 
an besonders zeitkritischen Stellen 
Gebrauch machen und in der Regel 
neue Worte mittels der sogenannten 
»Colon-Definition« einführen. Die 
Syntax dieser Definitionsmethode 
ist die folgende: 

: NEUWORT ALTWORT1 ALT- 
WORT2 .... ALTWORTn ; 

Diese Befehlssequenz erzeugt ein 
neues Wort, NEUWORT, welches 
durch die bereits vorhandenen 
Worte ALTWORT1 bis ALTWORTn 
definiert ist, Die Colon-Definition 
beginnt also immer mit dem Wort»:« 
und endet mit dem Wort »;«. Es ist 
wichtig, sich genau klar zu machen, 
daß »:« und »;« nicht irgendwelche 
syntaktisch notwendigen Zeichen 
sind, sondern daß es sich dabei tat¬ 
sächlich um normale Forth-Worte 
handelt. Das Wort»:«ruft vereinfacht 
gesagt den Forth-Compiler auf, wäh¬ 
rend das Wort »;« eine Anweisung 
zum Beenden der Compilation dar¬ 
stellt. 

Hinsichtlich der Namensgebung 
für neue Worte ist der Anwender im 
Prinzip keinen Beschränkungen un¬ 
terlegen. Benötigt man zum Beispiel 
des öfteren den Durchschnitt zweier 
Zahlen, dann kann man einfach defi¬ 
nieren 

: MITTEL + 2 / . ; 

Nach dieser Definition kann man 
jetzt einfach schreiben 4 8 MITTEL 
und erhält den Wert 6 angezeigt. 
MITTEL erwartet also zwei Zahlen 
auf dem Stack, die zunächst addiert 
werden (»+«). Das Ergebnis dieser 
Operation wird dann durch zwei ge¬ 
teilt (»2 /«) und schließlich ausge¬ 
druckt (».«). An der Definition von 
MITTEL ist schon zu sehen, wie kurz 
und effizient Forth-Programme sein 
können. In Basic würde ein entspre¬ 
chendes Programm etwa folgender¬ 
maßen aussehen: 

10 INPUT X,Y : PRINT (X+Y)/2 : 

REM Mittel 

Mit der Colon-Definition kann man 
auch auf einfachem Wege Forth- 
Worten neue Namen zuweisen. 
Wenn man zum Beispiel für das Aus¬ 
drucken einer Zahl lieber den Be¬ 
fehl »DRUCKE« hätte, kann man ein¬ 
fach definieren 


:DRUCKE. ; 

Nun kann man überall DRUCKE 
statt».«schreiben. Wenn man es wie¬ 
der leid ist, ständig sechs Buchsta¬ 
ben statt einem schreiben zu müs¬ 
sen, teilt man dem Forth-System ein¬ 
fach mit, daß es das Wort DRUCKE 
vergessen soll. Der dazu nötige Be¬ 
fehl lautet FORGET DRUCKE. Aller¬ 
dings löscht dieser Befehl nicht nur 
die Definition von DRUCKE, son¬ 
dern auch alle anderen eventuell 
noch danach erfolgten Definitionen. 
Das hängt damit zusammen, daß 
Forth alle Definitionen in einer ver¬ 
ketteten Liste abspeichert, dem so¬ 
genannten Wörterbuch (Bild 2). 

Strukturiert 

Programmieren 

Forth zwingt den Programmierer 
geradezu, seine Programme modu¬ 
lar aufzubauen. Es gibt in Forth kei¬ 
nen dem GOTO in Basic vergleich¬ 
baren Befehl. Ein komplexes Forth- 
Programm entsteht immer zuerst auf 
dem Papier. Wenn die Programm¬ 
struktur festliegt, entwickelt man zu¬ 
nächst die benötigten Unterroutmen 
und testet sie aus. Diese Unterrouti¬ 
nen sind danach ja als völlig norma¬ 
le Forth-Worte zu benutzen und kön¬ 
nen dazu verwendet werden, nun ei¬ 
ne weitere Ebene noch »mächtige¬ 
rer« Worte zu definieren. Am Ende 
dieses Prozesses steht dann prak¬ 
tisch ein Wort, das das gesamte Pro¬ 
gramm repräsentiert. 

Forth besitzt, ähnlich wie Pascal, 
eine ganze Reihe sogenannter Kon¬ 
trollstrukturen, um strukturierte Pro¬ 
grammierung zu unterstützen: 

IF ... ENDIF — Die IF-Abfrage testet, 

ob der TOS (Top of Stack, also das 
oberste Element des Stacks) den 
Wert Null (= False) oder einen Wert 
ungleich Null (= True) hat. Ist das 
Ergebnis »True«, dann werden die 
Anweisungen zwischen IF und EN¬ 
DIF ausgeführt, andernfalls wird 
das Programm nach ENDIF fortge¬ 
setzt. Einige ältere Forth-Versionen 
benutzen das Schlüsselwort THEN 
statt ENDIF. 

IF... ELSE... ENDIF - Arbeitet ähnlich 
der einfachen IF-Abfrage, führt aber 
im Falle TOS = 0 die Anweisungen 
zwischen ELSE und ENDIF aus, 
sonst die Anweisungen zwischen IF 
und ELSE. 

DO ... LOOP — Entspricht der FOR- 
NEXT-Anweisung in Basic. Das Wort 
DO erwartet zwei Parameter auf 
dem Stack, nämlich die Anfangs¬ 
und die Endzahl der Schleifen¬ 
durchläufe. Mit LOOP wird die 


Schleife beendet. Falls das Wort 
+ LOOP statt LOOP verwendet wird, 
erhöht sich der Schleifenindex nicht 
um 1, sondern um den Wert des 
TOS. Das Wort »I« wird innerhalb von 
Schleifen dazu verwendet, den 
Schleifenzähler auf den Stack zu ko¬ 
pieren. 

BEGIN... UNTIL — Diese Schleife wird 
solange durchlaufen, bis UNTIL ei¬ 
nen Wert ungleich Null (also »True«) 
auf dem Stack vorfindet, Entspricht 
REPEAT ... UNTIL in Pascal. 

BEGIN ... WHILE ... REPEAT - Der Pro¬ 
grammteil zwischen BEGIN und RE¬ 
PEAT wird solange durchlaufen, bis 
das Wort WHILE die Bedingung 
TOS = 0 feststellt. Danach wird die 
Schleife unmittelbar hinter WHILE 
verlassen. 

BEGIN ... AGAIN — Dient zum Pro¬ 
grammieren unendlicher Schleifen 
und testet keinerlei Bedingungen. 

Wer in seinen Forth-Programmen 
weitere Schleifen- oder Auswahl¬ 
strukturen benötigt, kann sie sich 
einfach selber definieren. Das gilt 
für praktisch alle Bereiche. Forth ar¬ 
beitet zum Beispiel normalerweise 
nur mit Integer-Arithmetik. Wer nun 
für seine spezielle Anwendung 
Real-Zahlen benötigt, besorgt sich 
einfach ein REAL-Vokabular von 
Forth und bindet es in sein System 
ein. So kann sich jeder Anwender 
sein persönliches Forth-System zu¬ 
sammenstellen und nach seinen Be¬ 
dürfnissen von Fall zu Fall erweitern. 

Es ist klar, daß es sehr schwierig 
ist, für eine derartig flexible Spra¬ 
che einen sinnvollen Standard zu fin¬ 
den. Die Forth Interest Group (FIG), 
eine nichtkommerzielle Vereini¬ 
gung von Forth-Enthusiasten, be¬ 
müht sich seit Jahren mit gewissem 
Erfolg um eine Standardisierung 
von Forth. Zu diesem Zweck gibt die 
Forth Interest Group vollständige 
Assemblerlistings des sogenannten 
FIG-Forth mit Implementationshin¬ 
weisen für alle gängigen Mikrocom¬ 
puter heraus. Eine spezielle Forth- 
Zeitschrift, die »Forth Dimensions« 
kann dort ebenfalls bezogen wer¬ 
den. Die Adresse ist Forth Interest 
Group, PO. Box 1105, San Carlos, CA 
94070, USA. 

Wer sich näher mit Forth beschäf¬ 
tigen will, dem seien zum Abschluß 
noch drei Bücher empfohlen: 

Starting Forth von Leo Brodie, zu 
beziehen über die Forth Interest 
Group; 

Das Forth Handbuch von H. Floegel, 
erschienen im Hofacker-Verlag; 

Die Programmiersprache Forth 
von R. Zech, erschienen im Franzis- 
Verlag. (ev) 
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S tellen Sie sich vor, Sie schalten 
den Commodore 64 an, laden 
ein Programm und Ihr Compu¬ 
ter meldet sich mit »WORDSTAR re- 
lease 3.25«. Der C 64 als Computer 
für Programme, die für wesentliche 
größere (und teurere) Systeme ent¬ 
wickelt wurden! Oder möchten Sie 
in Fortran, Cobol, PLI oder Algol 
programmieren? Warum nicht? Das 
zur Verfügung stehende Potential an 
CP/M-Software ist beinahe uner¬ 
schöpflich. 

Aber woher ist diese Software zu 
beziehen? Diese Frage ist berech¬ 
tigt. Wer einmal versucht hat, in ei¬ 
nem Fachgeschäft, oder einem Soft¬ 
warehaus CP/M-Programme im Dis¬ 
kettenformat der 1541-Floppys zu 
kaufen, wurde wahrscheinlich ent¬ 
täuscht. 

Eigentlich schade, denn eine Um¬ 
frage bei einigen Münchener Com¬ 
puterfachgeschäften erbrachte, daß 
nach dem Steckmodul häufig ge¬ 
fragt wurde. Erhältlich war das Mo¬ 
dul aber nur in einem einzigen Ge¬ 
schäft. Dort wurde es, der eigenen 
Stellung wohl bewußt, nur zögernd 
unter dem Ladentisch hervorgezo¬ 
gen. Erst nach mehrmaligem Beto¬ 
nen der Dringlichkeit des Kaufs, 
konnte sich der Verkäufer zum 


Tausch des Moduls gegen Geld ent¬ 
schließen. Ein Markt, der einfach 
brachliegt, beziehungsweise ein¬ 
fallsreichen Bastlern überlassen 
wird (der Diplomkaufmann in mir 
regt sich). 

Nutzen wir die Zeit, bis es eigene 
C 64-CP/M-Software gibt, mit einer 
gar nicht so schlechten Behelfslö¬ 
sung. Wir koppeln einen Apple II 
mit dem Commodore. Dabei geht 
man wie folgt vor: 

Punkt 1: Sie bauen oder kaufen sich 
ein Verbindungskabel zwischen ei¬ 
nem Apple II und dem Commodore 
64. 

Punkt 2: Sie kaufen sich die ge¬ 
wünschte CP/M-Software im Apple 
II Format. 

Punkt 3: Sie suchen einen Apple-II- 


Besitzer, (zum Beispiel über eine An¬ 
zeige). 

Punkt 4: Sie schreiben sich, oder 
was leichter ist, sie kaufen sich Soft¬ 
ware zur Übertragung. 

Punkt 5: Sie koppeln die beiden 
Computer, und überspielen die ge¬ 
kauften Programme. 

Dieses Verfahren ist so einfach, 
wie wirkungsvoll, 

Zum Test verwendete ich das 
Transferpaket von Bieling und 
machte mich an die Arbeit. Das Ka¬ 
bel wird auf der Apple-Seite in den 
Spieleanschluß gesteckt und beim 
Commodore natürlich in den User- 
Port. Nach dem Laden der Transfer¬ 
software kann das Übertragen be¬ 
ginnen, »Schon« nach 18 Minuten 
war eine gesamte Diskette übertra- 
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zu erzielen. Dazu ist es notwendig, 
dieses näher zu betrachten, In dem 
Bereich $0B97 bis $0BCB befindet 
sich eine Routine, die zum Initialisie¬ 
ren des Laufwerkes, sowie zum Er¬ 
öffnen einer Direktzugriffsdatei 
dient. Ferner wird in den Speicher¬ 
stellen $0B9E und $0BB8 die Geräte¬ 
adresse in das X-Register geladen. 
Damit liegt es nahe, diese Routine je¬ 
desmal, wenn die Laufwerksnum¬ 
mer (0 oder 1) gewechselt wird, an¬ 
zuspringen und vorher das Argu¬ 
ment LDX der Laufwerksnummer 
entsprechend auf 8 oder 9 zu setzen. 
Die Stelle, die die Laufwerksnum¬ 
mer überprüft, liegt im BIOS bei 
$0AF5. Dort wird die Diskettennum¬ 
mer ausgelesen, in ASCII-Code um¬ 
gewandelt und gespeichert. Hier 
ersetzt man den Sprung in die 
ASCII-Wandelroutine durch den in 
eine Erweiterungsroutine zwischen 
$0C98 bis $0CBB. Falls die Lauf¬ 
werksnummer 0 war, wird dort 
überprüft, ob das Argument von 
LDX 8 ist. Wenn ja, erfolgt ein Rück¬ 
sprung. Wenn nein, wird es in 8 ge¬ 
ändert und die Initialisierungsrouti¬ 
ne angesprungen. Das gleiche gilt 
für den umgekehrten Fall. 

Am komfortabelsten läßt sich die¬ 
se Änderung mit dem Basic-Pro- 


gen. Mit dem DOS im Floppy 1541 
lassen sich leider ohne größeren 
Aufwand keine höheren Transferra¬ 
ten erreichen. Aber immerhin, es 
geht. 

Eines sei bei aller Freude über 
diese Quelle wirklich guter Softwa¬ 
re angefügt: Da Computer und Pro¬ 
gramme immer jenseits von Gut und 
Böse stehen und somit nicht fähig 
sind, Urheberrechten und ähnli¬ 
chem Beachtung zu schenken, 
obliegt Ihnen diese Pflicht. Erkundi¬ 
gen Sie sich lieber vorher, ob es Ein¬ 
wände von seiten der Lizenzgeber 
gegen die Übertragung gibt. 

Was passiert aber, wenn es Ihnen 
gelungen ist, ein Programm zu ko¬ 
pieren. Läuft es einwandfrei, oder 
sind da und dort noch kleine Ände¬ 


rungen vorzunehmen? Das erste 
Hindernis, dem sie auf Ihrer Erkun¬ 
dungsreise durch die CP/M-Soft- 
ware begegnen werden, ist deren 
Verlangen nach einer Darstellung 
von 80 Zeichen auf dem Bildschirm. 

Hier empfiehlt es sich, die An¬ 
schaffung einer 80-Zeichen-Karte in 
Erwägung zu ziehen. Alle mir be¬ 
kannten Softwarelösungen liefern 
ein unbefriedigendes Ergebnis. 

Ein wesentlich schwerwiegende¬ 
res Problem liegt im BIOS (Basic- 
Input/Output-System) des Commo- 
dore-CP/M. Dieses ist bekanntlich 
für nur ein Laufwerk konzipiert wor¬ 
den. Viele CP/M-Programme set¬ 
zen ihrerseits aber ein Doppellauf¬ 
werk voraus. Eine Lösung ist nur 
durch eine Abänderung des BIOS 
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gramm vornehmen (Programm la¬ 
den, CP/M-Diskette in das Laufwerk 
einlegen, Programm starten). Vor 
dem Booten des CP/M-Ladepro- 
gramms ist natürlich dafür zu sor¬ 
gen, daß eines der Laufwerke die 
Geräteadresse 9 hat. Außerdem 
muß nach dem Starten des CP/M mit 
dem Programm Config (ist auf der 
Systemdiskette) die Anzahl der 
' Laufwerke auf zwei erhöht werden. 
Nach dem Verlassen dieses Pro¬ 
gramms können Sie mit Ihren bei¬ 
den Laufwerken wie mit einem Dop¬ 
pellaufwerk unter CP/M arbeiten. 

Beispielsweise mit Wordstar, ei¬ 
nem sehr beliebten und oft verkauf¬ 
ten Textverarbeitungsprogramm, 

Da ich die meisten meiner Berich¬ 
te auf einem IBM-PC mit Wordstar 
t schreibe, war ich natürlich sehr ge¬ 
spannt, wie das gleiche Programm 
auf dem Commodore 64 aussieht. 
Die erste Einschränkung, die ich 
machen mußte, war der Anspruch 
auf schnelle Diskettenoperationen. 
Viele der komfortablen Befehle des 
Wordstar gehen durch die langsa¬ 
me Ladegeschwindigkeit der Flop¬ 
py verloren oder verlieren ihren 
' Sinn. 

Auch mit zwei Laufwerken bleibt 
das Laden, Speichern und Booten 
fc eine langwierige, Geduld erfor¬ 
dernde Angelegenheit. Zusätzlich 
fiel mir auf, daß eine Ausgabe auf 
1 den Drucker nur mit einem am se¬ 
riellen Bus angeschlossenen Gerät 
möglich war. Wer aber beispiels¬ 
weise einen Epson-Drucker mit ei¬ 
ner Softwareschnittstelle betreibt, 
wird in den meisten Fällen keinen 

I Buchstaben auf das Papier bekom¬ 
men. Beachtet man den Preis, den 
man für eine Wordstar-Diskette im 
Apple-Format bezahlen muß, ad¬ 
diert dazu die Kosten für eine 
j 80-Zeichen-Karte und das Modul, so 
lohnt sich fast schon die Anschaf- 
j fung eines anderen Systems. 

Die schon aus dem Handbuch 
zum Commodore 64 bekannte spär- 
l liehe Dokumentation findet im Bei¬ 
packzettel zum CP/M-Modul eine 
Steigerung. Mit den Hinweisen kann 
jeder Anwender etwa soviel anfan- 
I gen, wie ein Fernsehzuschauer mit 
dem Pogramm der letzten Woche — 
; nämlich nichts. Dabei werden auf 
: der dem Modul beiliegenden Sy- 
j stemdiskette einige recht interes¬ 
sante Hilfsprogramme mitgeliefert. 
Außer einem lapidaren Hinweis auf 
’ | etwa zur Verfügung stehende (und 
: extra zu bezahlende) Literatur wird 
der frischgebackene Modulbesit¬ 
zer mit einem windigen Blättchen 
Papier alleingelassen. 


Obwohl es nicht die Aufgabe ei¬ 
ner Zeitschrift ist, fehlende Handbü¬ 
cher nachzuliefern, sollen diese 
Dienstprogramme hier kurz vorge¬ 
stellt werden: 


1 REM AENDERUNG DES BIOS 

2 REM ZUM BETRIEB DES 

3 REM CP/M MODULS MIT 

4 REM ZWEI LAUFWERKEN 

5 REM 

10 0PEN1,8,15:QPEN2,B,2,"#" 

20 PRINT#1,"U1 20 1 1" 

30 PRINTttl,"B-P 2 249" 

40 PRINT#2,CHRS(152);CHR$ 112); 

50 PRINTttl,"U2 20 1 1" 

60 CLOSEI:CL0SE2 

70 0PEN1,B,15:0PEN2,8,2,"#" 

80 PRINTttl,"Ul 2013" 

90 PRINT#1,"B-P 2 152" 

100 FORI=lT036 
110 READQ 

120 PRINT#2,CHR*<Q); 

130 NEXTI 

140 PRINT#1,"U2 2013" 

150 CLOSEI:CL0SE2 

160 DATA 240,15,162,9,236,159,11,240 
170 DATA 24,142,159,11,142,185,11,16 
180 DATA 13,162,8,236,159,11,240,9 
190 DATA 142,159,11,142,185,11,32,151 
200 DATA 11,169,0,96 
READY. 


Basicprogramm zum Ändern des BIOS 

1. MOVCPM Mit diesem Programm 
können Sie Ihr Betriebssystem än¬ 
dern, zum Beispiel an einen ande¬ 
ren Platz im Speicher verlegen. Die 
Routine kann dazu verwendet wer¬ 
den, eine 48 KByte-Vemion zu erzeu¬ 
gen, und mit SYSGEN direkt auf die 
CP/M-Spuren zu schreiben. Leider 
funktioniert dieses Dienstpro¬ 
gramm nicht fehlerfrei, denn es tritt 
ein Synchronisationsfehler auf. 
Wahrscheinlich stimmen die Versio¬ 
nen von CP/M und MOVCPM nicht 
überein. Eine 48-KByte-Version soll¬ 
te immer dann konstruiert werden, 
wenn der Drucker und die Floppy 
am seriellen Bus angeschlossen ist. 
Für das Arbeiten mit einem IEEE- 
Interface muß man aber eine 
44-KByte-CP/M-Version ßenulzen. 

2. DDT. Diese sehr wichtige Routine 
dient der Kontrolle neuer Program¬ 
me, deren sicheres »Laufen« noch 
ungewiß ist. Im einzelnen lassen 
sich damit Dateien lesen, Speicher¬ 
inhalte anschauen und verändern 
sowie das Programmverhalten un¬ 
tersuchen. 

3.SUBMIT Ein Programm, das für oft 
wiederkehrende Aufgabenstellun¬ 
gen sehr nützlich sein kann. Die For¬ 
mulierung der Aufgabe mit dem 
Editor (ED) ist ausreichend; die Ab¬ 
arbeitung der Befehle wird dem 
Computer überlassen, Eine noch 
höhere Automatisierung ist mit dem 
Programm XSUB zu erreichen. Da¬ 
mit ist es möglich, die aufgerufenen 
Programme durch die Aufgabenda¬ 
tei zu bedienen. 

4. ED Der Editor, ein unglaublich viel¬ 
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fähiges Programm, das beim Arbei- | 
ten mit CP/M oft gebraucht wird. Mit ,■ 
dem Editor ist es möglich, dem 
Computer Zeichen einzugeben, oh- 
ne daß diese als Befehl aufgefaßt 
und sofort ausgeführt werden. So ist > 
beispielsweise eine einfache Text- j 
Verarbeitung mit dem Editor mög- , 
lieh, Aber auch zur Erstellung, Ver- 
änderung und Korrektur von Pro¬ 
grammen ist er einsetzbar. 

5.SYSGEN ist ein Dienstprogramm mit 14 
dem sich das Betriebssystem auf je¬ 
de formatierte Diskette überspielen 
läßt. 

6. CONFIG dient der Zusammenstel¬ 
lung der Hardwarekonfiguration. Es 
kann gewählt werden zwischen den - 
folgenden Einstellungsmöglichkei- § 
ten: Anzahl der Laufwerke, Drucker¬ 
typ, Schriftmodus und Belegung der 
Funktionstasten. 

7. DUMP zeigt den Inhalt einer Datei in 
den binären Werten seiner Bytes. 
(Hexdump). 

8. PIP unterstützt den Datenaustausch 
mit den angeschlossenen Periphe¬ 
riegeräten, wie dem Drucker, der 
Floppy und als Überbleibsel aus 
der Entstehungszeit von CP/M, mit 
Lochstreifenlesern und Fernschrei- ‘J 
bern. So können Dateien ausge¬ 
druckt oder kopiert werden; auch 
läßt sich aus mehreren Einzeldatei- 1 
en eine neue kreieren. 

9. COPY ist ein speziell für Commodo¬ 
re hinzugefügtes Diskettenhilfspro¬ 
gramm. Mit COPY lassen sich Dis¬ 
ketten formatieren und kopieren. 
Der Backup einer gesamten Disket¬ 
te dauert (auch mit zwei Laufwer¬ 
ken) immer noch zirka 15 Minuten. 

10. ASM ist ein Assembler, mit dem 
sich in mnemomscher Schreibweise 
verfaßte Programme übersetzen 
lassen. Neben ASM wird hierzu 
auch das Programm LOAD verweil- , 
det, das die durch das Assemblie- ■ 
ren entstandene HEX Datei in eine 
COM Datei umwandelt. Durch die¬ 
sen Prozeß werden die Daten so auf- I 
bereitet, daß sie direkt aufrufbar •; 
sind und ausgeführt werden kön- t 
nen. 

Eigentlich eine ganze Menge, was 
eine Systemdiskette alles ermög- : 
licht: einfache Textverarbeitung, 
Programmierung und Datenüber¬ 
tragung, wenn auch in einer unkom- 
fortablen Form. Würde man ver¬ 
gleichbare Programme für den 
Commodore 64 kaufen, um mit ihm 
in seiner eigenen Sprache zu kom¬ 
munizieren, müßte man wahrschein- . 
lieh mehr ausgeben als für das , 
CP/M-Modul. So gesehen lohnt sich 
die Anschaffung auf jeden Fall. 

(Arnd Wängler) ; 
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Programmiersprachen 



Für den Commodore 64 
gibt es bereits einige Versionen der 
Programmiersprache Pascal. Dieser 
Bericht stellt wichtige Elemente der 
Sprache vor und ver¬ 
gleicht sie mit äquivalenten 
Basic-Lösungen. 



leistungsfähiger 




detsefoe« 


W ie lange besitzen Sie schon 
den Commodore 64? Wenn 
Sie ihn wie ich schon längere 
Zeit und einige Gehversuche in Ba¬ 
sic schon hinter sich haben, die Pha¬ 
se der Spielsucht und des Pro- 
gramme-Scheffelns überstanden 
haben, dann werden Sie sich wohl 
wieder dem Programmieren in Ba¬ 
sic zuwenden, nur diesmal ungleich 
intensiver. Jetzt stellt sich jedoch 
heraus: das eingebaute Basic hält 
den gewachsenen Anforderungen 
nicht stand. 

Eine neue Sprache, gut, aber wel¬ 
che? Da gibt’s ja eine Unmenge da¬ 
von, zum Beispiel Forth, Cobol, Al- 


— Möglichkeit für Rekursionen 

— eigene Typendefinitionen 

— Records etc. 

Über Schlagworte läßt sich be¬ 
kanntlich streiten, aber ich möchte 
beweisen, daß sie für Pascal wirk-^ 
lieh zutreffen. 

Niklaus Wirth, der diese Sprache 
aus den beiden Hauptlinien Algol 68 
und Fortran beziehungsweise PL/1 
1971 an der ETH Zürich entwickelte, 
hat sie Pascal genannt, zu Ehren des 
französischen Mathematikers und 
Philosophen Blaise Pascal (zirka 
1650). Man kann deshalb von einem 
Wirth-Standard im Gegensatz zum 
UCSD-Pascal sprechen. Das UCSD- 
Pascal entstand in Kalifornien und 
enthält nun auch den Typ »STRING« 
sowie Operatoren auf diesen Typ 
wie man es von Basic her gewöhnt 
ist. Ansonsten ist der Unterschied 
nicht annähernd so groß, wie der¬ 
jenige zwischen Basicdialekten. 

Pascal ist wegen seiner Klarheit 
im Aufbau und seiner enormen Lei¬ 
stungsfähigkeit zur wichtigsten, wis¬ 
senschaftlichen Programmierspra¬ 
che geworden. 

Ein äußerlicher Unterschied ge¬ 
genüber Basic besteht darin, daß 
Pascal vollkommen formatfrei ist, 

das heißt es gibt keine Zeilennum- 


Diesem Statement entspricht in 
Basic die folgende Sequenz: 

FOR i = 10 TO 3 STEP —1: befehle: 
NEXT 

Diese ganze Schleife ist ein State¬ 
ment. Obwohl sie mehrere Befehls¬ 
wörter enthält, muß man sie nicht mit 
»BEGIN« und »END« umklammern. 
Ebenfalls als em Statement gilt eine 
Wertzuweisung der Form: 
i := i + 1; 

Der Operator ': = ’ weist der links 
davon stehenden Variablen den 
Wert des rechten Ausdrucks (ex- 
pression) zu. Er ersetzt nicht den 
Vergleichsoperator ’ = ’. Diesen 
braucht man in Pascal korrekterwei¬ 
se nur für Vergleiche wie »IF i = 5 
THEN....« 

Wenn ich schon bei Vergleichssta¬ 
tements bin, kann ich die drei eben¬ 
falls »mehrwortigen« Statements be¬ 
sprechen, die Pascal für bedingte 
Abarbeitung eines Blocks besitzt, 
wobei eine Bedingung (condition) 
von der Form ist »variable 
= ,(),(=,=),(,) expression«: 

— IF condition THEN Statements 
ELSE Statements 

— WHILE condition DO Statement 

— REPEAT Statements UNTIL condi¬ 
tion 

Das erste Statement existiert fast in 


gol, Fortran, Pascal, Modula und As¬ 
sembler, die nur »ehrfürchtig« ge¬ 
nannt wird, da Assembler angeblich 
nur von absoluten Spitzenkönnern 
beherrscht wird. Zu den Könnern 
zählt man sich im allgemeinen noch 
nicht und läßt eben die Maschinen¬ 
sprache beiseite (weshalb eigent¬ 
lich?) und sucht sich eine sogenann¬ 
te »höhere« Programmiersprache. 
Die Wahl dürfte wahrscheinlich auf 
Pascal fallen, weil Forth zu fremd, 
Fortran zu antiquiert, Cobol zu »ge¬ 
schäftig«, Algol zu wissenschaftlich 
und Modula zu neu ist. Nun, Pascal 
hat schon einiges zu bieten, was Ba¬ 
sic nicht hat. Die Schlagwörter sind: 

— Strukturierte Programmierung 

— Blockorientierte Programmie¬ 
rung 

— Operatoren auf Mengen 

— Lokale Parameter 


merierung. Man darf daher eine Be¬ 
fehlssequenz (statements) über eine 
Bildschirmzeile hinaus auf der näch¬ 
sten fortsetzen, denn, als gültigen 
Statementstrenner gibt es nur das 
Semikolon (;). Pascal kennt daher 
den Befehl »GOTO/GOSUB Zeilen¬ 
nummer« nicht. Aber dafür ist Pas¬ 
cal sehr stark blockorientiert. Ein 
Block ist im einfachsten Fall entwe¬ 
der ein Befehl oder eine mit »BE¬ 
GIN« und »END« umschlossene Be¬ 
fehlssequenz. Andere Blocks sind 
»PROCEDURE«, eine Art Unterpro¬ 
gramm, und »FUNCTION«, auch ei¬ 
ne Art Unterprogramm, aber mit 
dem Unterschied, daß man einer 
»FUNCTION« einen Wert zuweisen 
kann. Darauf komme ich später zu¬ 
rück. Ein Beispiel dazu: 

FOR i := 10 DOWNTO 3 DO State¬ 
ment 


identischer Form in Basic, außer der 
Tatsache, daß »ELSE« im Basic des 
Commodore 64 natürlich fehlt. Die 
unteren beiden haben einen Schlei¬ 
fencharakter. Wofür nun aber zwei 
Schleifen, die sich doch fast nicht un¬ 
terscheiden? Nun, bei näherer Be¬ 
trachtung finden Sie sehr wohl einen 
interessanten Unterschied: Die 
»WHILE«-Schleife testet eine Bedin¬ 
gung bevor eine Befehlssequenz 
ausgeführt wird (Solange wie...wie¬ 
derhole...), die »REPEAT«-Schleife 
hingegen testet erst nach der Aus¬ 
führung (Wiederhole...bis...). Sie 
werden vielleicht sagen, das sei 
doch nun wirklich nur Haarspalte¬ 
rei. Mitnichten! In den folgenden 
zwei Beispielen sehen Sie, wie man 
damit elegant iterative Probleme mit 
Bedingungen programmieren kann. 
Kümmern Sie sich vorerst nicht um 
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und eleganter als Basic (Teil 1) 


die anderen Statements, die in den 
beiden Progrämmchen sonst noch 
Vorkommen, sondern konzentrieren 
Sie sich bitte nur auf die Schleifen. 

Beide Programme (Listing 1 und 
Listing 2) berechnen die Quadrat¬ 
wurzel einer Zahl: 

Die unterstrichenen Worte sind 
reservierte »Steuerworte« in Pascal, 
die nicht anders gebraucht werden 
dürfen. Die übrigen Worte sind Stan¬ 
dardprozeduren. Man erkennt sie 
auch daran, daß sie ein oder mehre¬ 
re Argumente in Klammern anneh¬ 
men können. Ein Statement kann aus 
Steuerworten und Prozeduren be¬ 
stehen, was man leicht erkennen 
kann, weil nach ’WHILEL’DO’ be¬ 
kanntlich nur ein Statement folgen 
darf, denn sonst müßte man ein En¬ 
de der »WHILE«-Schleife definie¬ 
ren. »PROGRAM«... sind die Pro¬ 
grammköpfe, »VAR«... die Deklara¬ 
tionsteile, auf die ich bald eingehen 
werde und innerhalb »BEGIN« und 
»END.« befindet sich das eigentliche 
Programm. »WRITE« beziehungs¬ 
weise »WRITELN« entsprechen im 
Commodore-Basic »PRINT;« bezie¬ 
hungsweise »PRINT«, »RE ADLN« 
dem »INPUT«. »SORT« entspricht 
»SOR« und berechnet die Quadrat¬ 
wurzel. 

Nun zur Routine selbst: Wie Sie 
wissen, kann man nur aus Zahlen 
>= 0 reelle Quadratwurzeln zie¬ 
hen, deshalb muß man vor der Be¬ 
rechnung jeweils testen, ob die mit 
»READLN« gelesene Zahl > = 0 ist. 
Dies geht natürlich sehr elegant mit 
der »WHILE«-Schleife, die ja vor der 
Ausführung den Test durchführt. In 
der »REPEAT«-Schleife muß hinge¬ 
gen unbedingt ein Test mit »IF« ge¬ 
macht werden. Weshalb wird aber 
die Eingabe zweimal geschrieben? 
Nun, erstens enthalten Variablen in 
Pascal, nachdem sie ins Leben ge¬ 
rufen wurden, keinen bestimmten 
Wert und zweitens muß der erstma¬ 
lige Test in der »WHILE«-Schleife et¬ 
was »Wohldefiniertes« zum Testen 
haben. Man sieht auch gleich, daß 
der ganze Inhalt der »WHILE«- 
Schleife übersprungen wird, falls 
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die erste Eingabe < 0 ist. Hätte man 
nun in der »WHILE«-Schleife keine 
Gelegenheit mehr, »z« zu verändern, 
käme man niemals mehr aus ihr her¬ 
aus. In der »REPEAT«-Schleife ver¬ 
hält es sich diesbezüglich ähnlich. 
Nun noch schnell das äquivalente 
Basicprogramm: 

In dem äquivalenten Basic- 
Programm (Listing 3) entsprechen 
der kleinen Standardprozedur »RE- 
ADLN« die Zeilen 30 und 40. Es ist 
sehr schön zu sehen, daß man in Ba¬ 
sic nicht ohne das »GOTO« aus¬ 
kommt und daß das Programm jetzt 
schon schlechter ist, als dasjenige in 
Pascal. Stellen Sie sich schon jetzt 
mal vor, wie es sich erst mit längeren 
bis sehr langen Programmen ver¬ 
hält, bei denen man nicht sc - chnell 
sieht, was alles wiederholt wird, weil 
zwischen der angesprungenen Zei¬ 
le und dem entsprechenden »GO¬ 
TO« eventuell mehr als 100 Zeilen 
liegen. 

Ein weiteres Pascal-Statement, 
von dem man sagen könnte, daß es 
irgend etwas teste, ist das »CASE«- 
Statement. Es lautet: 


— CASE selektor OF 
marke 1 : STATEMENT 
marke 2 : STATEMENT 
marke 3 : STATEMENT 


marke n : STATEMENT 
END: 

Mit ihm kann man eine aus mehre¬ 
ren Möglichkeiten auswählen, je 
nachdem welcher Marke der Selek¬ 
tor entspricht. Es entspricht den »ON 
x GOTO« und »ON x GOSUB«- 
Verteilern. Aber »CASE« ist dage¬ 
gen ungleich vielseitiger. Bekannt¬ 
lich darf »x« in Basic weder ein Aus¬ 
druck noch ein alphanumerisches 
Zeichen sein. In Pascal darf der Se¬ 
lektor ein beliebiges Zeichen sein. 
Listing 4 zeigt dies. 

Je nachdem, welchen Wert »tagnr« 
hat, werden der Variablen »tag« die 
entsprechenden 3 Buchstaben zu¬ 
gewiesen. Stimmt der Selektor mit 
keiner der Marken überein, so ist im 
Standardpascal nicht definiert, was 
dann geschieht. In UCSD-Pascal 
hingegen wird einfach beim näch¬ 
sten Statement fortgefahren. Hier 
folgt nun noch das kleine äquivalen¬ 
te Basicprogramm dazu (Listing 5). 
Da im Basic des Commodore 64 
dem »IF...THEN«-Befehl das »ELSE« 
fehlt und weil eine Basiczeile nicht 
mehr als 80 Zeichen zuläßt, muß 
man auf die Konstruktion verschach¬ 
telter »IF...THEN...ELSE IF...THEN... 
ELSE IF...'s zur Emulation von »CASE« 
verzichten. Man sieht, daß man zur 
Emulation dieses Statements in Ba¬ 
sic sehr redundant programmieren 
muß. 

Es ist dies sicher nicht die einzige 
und schon gar nicht die eleganteste 
Lösung, aber wahrscheinlich dieje- 
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nige, die einem zuerst in den Sinn 
kommt. Eine weitere bevorzugte 
Verwendung von »CASE« ist die Me¬ 
nüsteuerung, wie Listing 6 zeigt. 

Zu Listing 6 ist nicht viel zu sagen, 
außer daß man sieht, daß der Selek¬ 
tor (Variable »w«) auch ein alphanu¬ 
merisches Zeichen sein kann und 
daß den Marken (»A«, »B«, »C«) meh¬ 
rere Statements folgen können. Hier 
also Zuweisungen und Prozeduren. 
Hinzu kommt noch eine neue Stan¬ 
dardprozedur genannt »PAGE«. Sie 
produziert einen Seitenvorschub auf 
einer Text-Ausgabedatei, weshalb 
dieser Prozedur ein Dateiname fol¬ 
gen muß. »PAGE (OUTPUT)« produ¬ 
ziert also einen Seitenvorschub auf 
dem Bildschirm, der sich als Lö¬ 
schen des Schirms äußert. 

Blockstruktur, lokale und 
globale Variablen 

Nun komme ich endlich zu demje¬ 
nigen Punkt, welchen ich bisher im¬ 
mer vor mir herschob, Ihnen aber 
schon vier mal in den Programmen 
vorgesetzt habe: Es ist dies der Pro¬ 
grammkopf mit dem wichtigen De¬ 
klarationsteil. Die Blockstruktur ist 
ein Hauptmerkmal von Pascal. Man 
kann sich eine Ebene vorstellen, die 
bezeichnet wird mit »PROGRAM na- 
me«. In ihr sind überall und jederzeit 
alle Konstanten und Variablen ver¬ 
fügbar und änderbar, die in dem zu 
dieser Ebene gehörigen Deklara¬ 
tionsteil angegeben werden müs¬ 
sen. Ein Programm, das völlig ohne 
Prozeduren und Funktionen aus¬ 
kommt, liegt in dieser Ebene, und 
somit leben alle Variablen in ihm 
(das heißt sie sind gültig), eben weil 

sie im Deklarationsteil dieser Ebene 

stehen. Im Deklarationsteil, der zu 
dieser Ebene gehört, wird nun ge¬ 
sagt, ob und welche Konstanten, Ty¬ 
pen und Variablen in dieser Ebene 
gebraucht werden. Man muß also 
alle in dieser Ebene verwendeten 
Variablen deklarieren. Wenn man 
nun ein Unterprogramm, genannt 
Prozedur, einführt, so bildet man ei¬ 
ne neue Ebene, die jetzt auf derjeni¬ 
gen liegt, die »PROGRAM« genannt 
wurde (es entsteht mit der Zeit eine 
Art Relief, indem Ebene auf Ebene 
zu liegen kommt). Will man die Va¬ 
riablen aus der Hauptebene (»PRO¬ 
GRAM«) benützen, so kann man das 
bedenkenlos tun. 

Man kann aber auch Konstanten, Ty¬ 
pen und Variablen definieren, die 
nur in dieser und jeder darauflie¬ 
genden Ebene leben, das heißt man 
kann von der Hauptebene diese Va- 
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riablen nicht ansprechen, weil sie 
für die Hauptebene nicht existieren, 
da sie nicht in deren Deklarations¬ 
teil verzeichnet sind. Daraus ergibt 
sich, daß man die gleichen Varia¬ 
blennamen verwenden darf, die ei¬ 
gentlich schon in der Hauptebene 
verteilt worden sind. Obwohl, gleich 
benannt, beeinflussen sie einander 
in keiner Weise. Beide Inhalte blei¬ 
ben erhalten. Je nachdem, in wel- 


10 

REM PROGRAMM TAGRECHNUNG 

20 

REM VARIABLEM 

taq$ 


30 

REM 


taqnr’/. 


40 

REM BERECHNUNG VON taqnr 

50 

IF taqnr'/. = 0 

THEN 

tag* = 

" MQN" 

60 

IF taqnrX = 1 

THEN 

taq$ *■ 

"DIE" 

70 

IF tagnrl'. = 2 

THEN 

tag* = 

"MIT" 

80 

IF taqnr''. = 3 

THEN 

tag* = 

"DON" 

90 

IF tagnr’I = 4 

THEN 

taaS = 

"FRE" 

1 00 

IF taqnr/. = 5 

THEN 

tag* =• 

"SAM" 

1 10 

XF taqnr’/. = 6 

THEN 

tag* = 

"BON" 

120 

PRINT taqnr'/." 

entspricht 

'tag* 

130 

END 





Listing 5. Dem Pascal-Programm in Listing 4 
entsprechendes Basic-Programm. 


ERQGRAM RAHMEN (INPUT,OUTPUT); 

VAR i,k,l : real; 

c,w : char; 

PPOCEDURE GETDATA; 

BEGIN 

<* *> 

<* HIER STEHT DIE DEFINITION *) 

<* *> 

END; (* VON GETDATA *) 

PROCEDÜRE USEDATA; 

BEGIN 

<* *> 

<* HIER STEHT DIE DEFINITION *) 

<* *> 

END; (* VON USEDATA *> 

PROCEDÜRE STOREDATA; 

BEGIN oaina^i 

(* *> 

<* HIER STEHT DIE DEFINITION *> 

(* *> 

END; (* VON STOREDATA *> 


BEGIN <* DES HAUPTPROGRAMMES *> 

REPEAI 

PAGE (OUTPUT); 

WRITELN; WRITELN; WRITELN; 

WRITELN (’ BITTE WAEHLEN SIE: ? ): 


WRITELN: 
WRITELN (' 
WRITELN <-' 
WRITELN (-’ 
WRITELN i* 
READ (w>; 
CASE w OF 
’ A’ 

* B’ 

’C’ 

END (* 


A : DATEN HOLEN ? ); 

B : DATEN BEARBEITEN : 
C : DATEN ABSPEICHERN 
G : BEENDEN ’>; 


? ) ; 


BEGIN 
BEGIN 
BEGIN 
OF CASE 


l 

k 

I 

*> 


= i + 1-5; GETDATA; 
= k - 2.9; USEDATA; 
=1-1; STOREDATA; 


END; 

END; 

END 


WRITELN; 

WRITELN ( J IST IHRE ARBEIT BEENDET J/N ?’) ; 
READ (c); 

UNHL c = ’J’ 

END. <* DES HAUPTPROGRAMMES *> 


Listing 6. Menüsteuerung über CASE-Anweisung in Pascal (Programmauszug) 


chem Block man sich befindet, sind 
gerade die Variablen von dessen 
Deklarationsteil aktiv. Man kann al¬ 
so, indem man in der Prozedur einen 


Deklarationsteil hat, eine Sperre 
aufbauen, die ein Verändern einer 
gleichlautenden Variable aus einer 
tieferliegenden Ebene verhindern 
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PROBRAM INITMATRIX (INPUT,OUTPUT); 

CONST n = 25s (* ZEILEN *> 

m = 15 C* SPALTEN *) 

JYPE matrix = ARRAY IO. . n, O. . ml OF INTEGER: 

VAR a : matrix; 

k,i : INTEGER; 

PRQQEDURE ZEILE; 

VAR i : INTEGER; 

BEGIN 

FÜR i := O IO m DO 
aIk,iD := 0; 

IND; 

BEGIN (* DES HAUPTROGRAMMES *) 
k := O; 

FÜR i := 0 TO n DO 
BEGIN 
ZEILE; 
k := k + 1; 

END; 

WRITELN (’DIE MATRIX IST JETZT INITIALISIERT WORDEN.'); 
END. («DES HAUPTROGRAMMES *) 


Listing 7. Sowohl im Hauptprogramm 
als auch im Unterprogramm »Zeile« ist eine 
Variable i definiert worden. 

Beide Variablen, trotz demselben Namen, sind 
völlig unabhängig voneinander. 


Listing 8. Parameterübergabe an Prozeduren. 
Es gibt formale und aktuelle Parameter. 


PRÜLEDURE OUT; 

VAR a.b : INTEGER: 

PROCEDURE IN (i : INTEGER: VAR j : INTEGER); 

BS51Ö 

j := i *2: 

END: 

BEGIN 


IN (a.b); 


END. 


kann. Aus dieser Tatsache entstand 
der Begriff der »Lokalen Variablen«. 
Ein typisches Anwendungsbeispiel 
dazu ist das »FOR i : = x TO y DO«- 
Statement. Da man mit diesem State¬ 
ment oft Indices verändert, heißt die 
Laufvariable meistens »i« für Index, 
und so hat es sich eingebürgert, daß 
man sie wenn möglich immer »i« 
nennt. Damit nun niemals irgend¬ 
welche Komplikationen auftreten 
können, deklariert man diese Varia¬ 
ble »i« meistens in jeder Ebene und 
zwar vom Typ »INTEGER«. Ich hoffe, 
daß dies am nächsten Beispiel (Li¬ 
sting 7) ein bißchen klarer wird: 

In Listing 7 gibt es zum ersten Mal 
einen fast ausgelasteten Deklara¬ 
tionsteil. Er ist strikt gegliedert und 
die Teile der Deklaration müssen 
immer in derselben Reihenfolge 
auftreten. Im Standardpascal lautet 
die Abfolge folgendermaßen: 


— Labelteil 

Zuweisung der 
Sprungmarken 

— Konstantenteil 

Deklaration und Zu¬ 
weisung 

— Typenteil 

Deklaration und Defi¬ 
nition 

— Variablenteil 

Deklaration und Ty¬ 
pe nzugehörigkeit 

— Prozeduren 

Deklaration und Defi- 

und Funktionen 

nition 


In UCSD-Pascal gibt es zwar den 
Labelteil, aber das »GOTO«- 


Statement nur bedingt. Man t arf da¬ 
her nicht ein Label anspringen, wel¬ 
ches außerhalb des aktuellen 
Blockes liegt. Ein Aussteigen aus 
dem gerade bearbeiteten Block ist 
nur mit »EXIT procedure p« möglich. 
Der aktuelle Block wird verlassen 
und die Prozedur »p« wird ausge¬ 
führt. Eine Labeldeklaration ge¬ 
schähe dann wie folgt: 

LABEL 0,27,56,876,9999 
Damit hätte ich 5 Labels deklariert, 
die irgendwo im betreffenden Block 
stehen können. Die Zahlen haben 
nichts mit irgendwelchen Zeilen¬ 
nummern zu tun (man kann sie natür¬ 
lich so verwenden). 

Die Konstantendeklaration: 
CONST name = wert; 

Die Typendeklaration: 

TYPE name = Definition des Typs; 
Die Variablendeklaration: 

VAR name : Typenzugehörigkeit; 
Die Prozeduren- und Funktionende¬ 
klaration: 

PROCEDURE name (Übergabepa¬ 
rameter); 

Definition der Prozedur 
FUNCTION name (Übergabepara¬ 
meter); 

Definition der Funktion 
Nun ist zwar endlich klar, was ein 
Deklarationsteü ist, aber die Typen¬ 
arten, von denen ich schon zwei in 
den Beispielprogrämmchen benutzt 
habe, sind noch immer nicht klar. 


Nun, es gibt einmal vordefinierte Ty¬ 
pen, diese sind: 


INTEGER 

Bereich der ganzen Zah¬ 
len von —32768 bis 
+ 32767 

REAL 

Bereich der reellen Zah¬ 
len von zirka 1E-38 bis 
zirka 1E38 

BOOLEAN 

Nur 2 Werte, 0 = false, 1 
= true 

CHAR 

1 Zeichen, das dem 
ASCII-Code von 32 bis 

127 entspricht 

TEXT 

Abkürzung für »file of 
char«, siehe weiter un¬ 
ten 

UCSD-Pascal existiert noch der Typ: 

STRING 

Zeichenkette, array of 
char 


Eine ebenfalls vordefinierte Ab¬ 
änderung der Standardtypen erhält 
man, indem man schreibt: »FILE OF 
Standard typ«. So deklariert man ei¬ 
ne sequentielle Datei, deren Ele¬ 
mente einem der Standardtypen an¬ 
gehören. Eine ungeheure Flexibili¬ 
tät erreicht Pascal nun, indem man 
eigene Typen definieren kann. Im 
letzten Beispiel habe ich auch einen 
eigenen Typen definiert, nämlich 
den Typ »matrix«. Er ist definiert als 
ein zweidimensionales Feld der 
Größe »m« * »n« Elemente des Stan¬ 
dardtyps »INTEGER«. In der Typen¬ 
deklaration hat man fast unbe¬ 
schränkte Möglichkeiten der Ty¬ 
pengenerierung. Da nun der Typ 
definiert ist, darf ich ihn im Varia¬ 
blendeklarationsteil verwenden. 
Auch das habe ich gemacht: Es sei 
»a« vom Typ »matrix«. Im Konstanten¬ 
teil hat man nur die Standardtypen 
zur Auswahl, da die Typendeklara¬ 
tion erst später folgt. Einen großen 
Nachteil hat die Sache mit dem De¬ 
klarationsteil: Da man nur Variablen 
benutzen darf, die man deklariert 
hat, kann man die Reservation von 
Speicherplatz für die Variablen 
nicht optimieren. Man sieht das sehr 
deutlich an der Variablen »a«. Die 
Größe der Matrix ist bestimmt 
durch die Konstanten »m« und »n«, 
die ich aber schon vorher deklarie¬ 
ren mußte. Ob ich nun wirklich die 
ganze Größe voll ausnutze oder 
nicht, ich muß die Array-Grenzen 
angeben. Unter Umständen ver¬ 
schleudere ich sehr viel Speicher¬ 
platz, eventuell reicht er aber nicht 
einmal. In Basic dagegen kann man 
schreiben: 

10 INPUT "WIEVIELE ZEILEN, 
SPALTEN" ;m,n 
20 DIM matrix(m,n) 

In Pascal geht es nicht so bequem, 
aber es ist möglich. Es werden noch 
einige Beispiele folgen, in denen an- 
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dere Typen gebraucht werden. Das 
Beispiel (Listing 7) zeigt, daß neben- 
und nacheinander zwei Variablen »i« 
leben können, die einander nicht 
zerstören. Die eine ist global, weil 
sie im Programmkopf deklariert 
worden ist, die andere ist lokal, da 
sie erst in der Prozedur deklariert 
wird. Man muß aber klar erkennen, 
daß man zu keinem Zeitpunkt die 
Werte beider Variablen zugleich 


beinhalten die Werte, die tatsächlich 
übergeben werden. In unserem Bei¬ 
spiel heißt das, daß die aktuellen Pa¬ 
rameter »a« beziehungsweise »b« 
den formalen Parametern » 1 « bezie¬ 
hungsweise »j« entsprechen. Nun, 
einen kleinen Unterschied gibt es 
aber doch, wie die Notation der for¬ 
malen Parameter vermuten läßt: 


jeder weiteren darin verschachtel¬ 
ten Prozedur lokal bekannt. Man hat 
nur darauf zu achten, daß man bei 
der Übergabe keinen Typenkonflikt 
verursacht und daß beim Aufruf 
ebenso viele Parameter stehen wie 
beim Prozedurenkopf. 

Diese Art der Parameterübergabe 
eignet sich besonders dazu, eigene 
Programmodule für eine Pro- 
grammroutinenbibliothek bereitzu¬ 
stellen. Ein weiteres Beispiel dazu 
mit einer »FUNKTION«, für eine 
ganz bestimmte Anwendung, näm¬ 
lich einer Vergleichsfunktion: 
Gegeben sei folgende Deklaration: 
CONST max = 10000; 

TYPE zahlenmenge = ARRAY 
(l.max) OF BOOLEAN; 

Eine Variable vom Typ »zahlen¬ 
menge« kann man auffassen als die 
Darstellung einer Menge von Zah¬ 
len zwischen »1« und »max«, wobei 
für jede solche Zahl der entspre¬ 
chende Boolean-Wert im Array an¬ 
gibt, ob sie Element der Menge ist 
oder nicht (das heißt ob der korre¬ 
spondierende Wert im Array »1« 
oder »0« ist). 

Gesucht ist nun eine Pascal Funk¬ 
tion, die das Enthaltensein einer 
Menge »ml« in einer Menge »m2« 
(beide vom obigen Typ) prüft. Eine 
mögliche Lösung zeigt Listing 9. 

Diese Funktion übernimmt nun 
aus dem Umfeld der Funktion zwei 
Variablen vom Typ »zahlenmenge« 
und weist sie den formalen Parame¬ 
tern »ml« und »m2« mittels der »call 
by value«-Methode zu. Neu bei der 
Funktion ist nun, daß hinter der 
Klammer noch deklariert werden 
muß, welchen Typs das Resultat der 
Funktion sein wird. Die Funktion ist 
ein wichtiger Bestandteil von Pascal. 
Ihr entspricht m Basic teilweise der 
Befehl »DEF FN name (variable) = 
expression«, außer daß er in Basic 
nur eine mathematische Formel de¬ 
finieren und nur eine numerische 
Variable übernehmen kann. Man 
kann mit ihm keinerlei Operationen 
definieren, die als Resultat einen 
Strmg oder emen Charakter ausge¬ 
ben. 

Der zweite Teil erscheint in der 
nächsten Ausgabe und beschreibt 
die Programmierung mit Funktio¬ 
nen, dem Mengentyp, Aufzählungs¬ 
und Auszähltyp sowie die Definition 
von Datensätzen und den Einsatz 
von Zeigern (POINTER). Kurz erläu¬ 
tert werden Befehle zur Dateibear¬ 
beitung. Den Abschluß bildet eine 
kritische Auseinandersetzung mit 
vier Pascal-Versionen, die alle auf 
dem Commodore 64 lauffähig sind. 

(Martin Baur) 
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ausgeben kann. Zu den Prozeduren 
ist zu sagen: Jede Prozedur hat einen 
Namen. Man kann ihr Werte über¬ 
geben, indem man hinter dem Na¬ 
men eine Klammer öffnet und die 
Variablennamen sowie deren Ty¬ 
penzugehörigkeit eingibt. Man kann 
nun aber auf zwei Arten Werte über¬ 
geben. Dies soll am Beispiel zweier 
Prozeduren (Listing 8) gezeigt wer¬ 
den: 

Man erkennt sofort, daß an die 
Prozedur »IN« zwei Werte überge¬ 
ben werden, fragt sich nur, wo der 
Unterschied der zwei Übergabear¬ 
ten liegt. Dies ist schnell geklärt: 

Die Parameter in Klammem bei 
der Prozedur »IN (i: INTEGER; VAR 
j: INTEGER)« sind sogenannte »for¬ 
male Parameter«, diejenigen aber 
im Prozedurenaufruf »IN(a,b> nennt 
man »aktuelle Parameter«. Die for¬ 
malen Parameter zeigen an, daß 
(hier zwei) Parameter übergeben 
werden, die in der betreffenden 
Prozedur »i« und »j« heißen werden. 
Die aktuellen Parameter dagegen 


Dem formalen Parameter »j« wird 
der Inhalt des aktuellen Parameters 
»a« übergeben. 

Dem formalen Parameter »j« je¬ 
doch wird die Speicherplatzadres¬ 
se des aktuellen Parameters »b« 
übergeben. Ein kleiner aber wichti¬ 
ger Unterschied. 

Wenn nämlich die Prozedur »IN (i: 
INTEGER; VAR j: INTEGER)« ausge¬ 
führt wird, wird der Inhalt von »a« in 
die Variable »i« kopiert. Der Inhalt 
von »a« wird in dieser Prozedur nicht 
verändert. Dagegen wird beim Auf¬ 
ruf von »IN (i: INTEGER; VAR j: INTE¬ 
GER)« nicht der Inhalt von »b« nach 
»j«, sondern deren Adresse zur 
Adresse von »j« kopiert. Das hat eine 
konsequenzenreiche Auswirkung: 
Alle Veränderungen von »j« in der 
Prozedur »IN« beeinflussen auch 
den Inhalt der globalen Variablen 
»b«, weil »j« nun ja einfach nur ein an¬ 
derer Name für die Variable »b« ist. 
Die erste Methode der Parameter¬ 
übergabe nennt man daher »call by 
value«, die zweite hingegen »call by 
reference«. Die Variablen sind nun 
in der betreffenden Prozedur sowie 
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Debugging — Fehlersuche 
in Basic-Programmen 


Diese Situation kennt wohl jeder Besitzer eines Home¬ 
computers zur Genüge: Da tippt man in stundenlanger 
Arbeit ein ellenlanges Listing ein, lehnt sich nach dem 
letzten »RETURN« einen Augenblick erleichtert zurück, 
gibt das magische Wort »RUN« ein - und natürlich 
läuft das Programm in keiner Weise so, wie es eigent¬ 
lich sollte. Das Spektrum der möglichen Ereignisse 
reicht dabei vom simplen »SYNTAX ERROR« bis zum 

völligen Absturz des Programms. 


S olange der Computer noch brav 
seine Fehlermeldungen ausgibt, 
hat man ja noch Glück gehabt. 
Kritisch wird die Situation dann, 
wenn auf dem Bildschirm ein eigen¬ 
artiges Gemisch undefinierbarer 
Zeichen erscheint und sich der 
Computer weder durch Betätigen 
aller erreichbaren Tasten, noch 
durch gutes Zureden wieder auf 
den Boden der Tatsachen zurückho¬ 
len läßt. Wenn man beim Eintippen 
eines Programms einmal an diesem 
Punkt angelangt ist, wird es Zeit, sich 
die erste Regel gut einzuprägen: Je¬ 
des Programm sollte vor dem Start 
unbedingt mit SAVE gesichert wer¬ 
den. 

Mit dem SAVEn allein ist es aller¬ 
dings noch nicht getan, es muß ef¬ 
fektiv noch etwas gegen die im Pro¬ 
gramm enthaltenen Fehler unter¬ 
nommen werden. Diesen Vorgang 
bezeichnet man auch als »Debug¬ 
ging«. Das Wort ist von der engli¬ 
schen Bezeichnung »Bug« abgeleitet 
und bedeutet eigentlich »entwan- 
zen«, wobei mif den »Wanzen« die 
Fehler gemeint sind, die sich überall 
im Programm verstecken. In der 
amerikanischen Umgangssprache 
hat sich das Wort ganz allgemein für 
das Suchen versteckter Fehler ein¬ 
gebürgert. 

Ganz grob kann man zwischen 
zwei Arten von Fehlern unterschei¬ 
den. Einerseits gibt es die logischen 

46 Q3Ö? 


Fehler, die mit schöner Regelmäßig¬ 
keit m der Entwicklungspnase eines 
Programms auftauchen, weil man 
dem Computer noch nicht genau ge¬ 
nug gesagt hat, was er denn nun ei¬ 
gentlich machen soll. Diese Art von 
Fehlern erkennt man zumeist daran, 
daß das Programm anstandslos 
läuft, aber nicht immer die ge¬ 
wünschten Ergebnisse produziert. 
Die zweite Art von Fehlern ist we¬ 
sentlich profanerer Natur und tritt 
praktisch jedesmal dann auf, wenn 
man ein Programm von einem frem¬ 
den Listing oder auch von den eige¬ 
nen Aufzeichnungen abtippt: Es han¬ 
delt sich dann zumeist um schlichte 
Tippfehler oder um Fehler, die auf 
schlechter Lesbarkeit der Vorlage 
beruhen. Wir wollen uns im folgen¬ 
den nur mit der zweiten Art von Feh¬ 
lern beschäftigen. 


Der Computer hilft 
bei der Fehlersuche 


Wie geht man nun zweckmäßig 
vor, um alle Fehler zu finden, ohne 
das gesamte Programm von Anfang 
bis Ende mit der Vorlage verglei¬ 
chen zu müssen? Nun, eine allge¬ 
meingültige Methode, die für alle 
Arten von Programmen anwendbar 
wäre, gibt es leider nicht. Dennoch 


erscheint ein gewisses systemati¬ 
sches Vorgehen durchaus ange¬ 
bracht. 

Zunächst sollten wir uns darüber 
klarwerden, inwieweit uns der Com¬ 
puter selbst bei der Suche nach Feh¬ 
lern helfen kann. Als erstes kommen 
einem dabei natürlich die Fehler¬ 
meldungen in den Sinn, die beim 
Commodore-Basic ja erfreulicher¬ 
weise im Klartext erfolgen und recht 
vielfältig sind. Wer mit den engli¬ 
schen Bezeichnungen nicht sofort et¬ 
was anfangen kann, hat die Möglich¬ 
keit, die deutschen Erläuterungen 
dazu im Handbuch nachzuschlagen. 

Was aber soll man tun, wenn der 
Computer gar keine Fehlermeldung 
ausgibt, sondern sich nach »RUN« 
einfach sang- und klanglos verab¬ 
schiedet und auf keine Tasten mehr 
reagiert? 

Nun, für solche Fälle gibt es im Ba¬ 
sic des C 64 beziehungsweise des 
VC 20 zwei spezielle Befehle, die 
man immer dann in nicht zu gerin¬ 
gem Umfang einsetzen sollte, wenn 
man nicht genau weiß, wo denn nun 
der Fehler steckt. Gemeint sind die 
Basic-Befehle STOP und CONT. 
Wenn der Computer beim Abarbei¬ 
ten des Programms auf den Befehl 
STOP stößt, unterbricht er die Pro¬ 
grammausführung und gibt eine 
Meldung »BREAK IN nnn« aus, wo¬ 
bei nnn die Zeilennummer ist, in der 
er die STOP-Anweisung gefunden 
hat. Alle Variablen und auch der 
Stackpointer bleiben dabei erhal¬ 
ten, so daß die STOP-Anweisung 
auch in Unterprogrammen und in¬ 
nerhalb von FOR-NEXT-Schleifen 
auftreten kann. 

Nach einem solchermaßen er¬ 
zwungenen Programmstop kann 
man sich im Direktmodus mit dem 
PRINT-Befehl über die Werte wichti¬ 
ger Variablen informieren und so¬ 
gar mit LIST einzelne Programmteile 
anschauen. Danach gibt man den 
CONT-Befehl, und das Programm 
wird ganz normal fortgesetzt. Wenn 
es zu Testzwecken notwendig er¬ 
scheint, kann man während eines 
Stops auch im Direktmodus Varia- 
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bienwerte verändern oder FOR- 
NEXT-Schleifen verwenden. Aller¬ 
dings dürfen weder neue Pro¬ 
grammzeilen eingegeben noch alte 
gelöscht oder verändert werden, da 
dadurch gleichzeitig alle Variablen 
gelöscht werden und CONT danach 
nicht mehr möglich ist. 

Es ist empfehlenswert, an kriti¬ 
schen Stellen im Programm STOP- 
Befehle einzufügen, um dadurch 
den Programmlauf verfolgen zu kön¬ 
nen und den Fehler immer mehr ein¬ 
zugrenzen. Kritische Stellen sind ge¬ 
nerell und ohne Ausnahme alle SYS- 
und USR-Aufrufe, desgleichen alle 
POKE-Befehle, über deren Bedeu¬ 
tung man sich nicht hundertprozen¬ 
tig im klaren ist. Im Zweifelsfalle soll¬ 
te man auch nach jedem GOSUB im 
Programm zunächst einen STOP- 
Befehl einbauen, um sicherzuge¬ 
hen, daß das Unterprogramm auch 
wieder auf normalem Wege verlas¬ 
sen wird. 


Fehlersuche mit 
STOP und PRINT 


Jedesmal, wenn man die Harmlo¬ 
sigkeit, zum Beispiel eines SYS- 
Befehls, durch davor und danach 
plazierte STOP-Befehle festgestellt 
hat, kann man die STOPs natürlich 
wieder entfernen, um einen flüssi¬ 
geren Programmablauf zu errei¬ 
chen. Es empfiehlt sich, alle einge¬ 
fügten STOP-Befehle auf einem Zet¬ 
tel zu notieren, um die Übersicht zu 
behalten. Schließlich dienen diese 
Befehle nur der Fehlersuche und 
müssen irgendwann einmal alle wie¬ 
der entfernt werden. 

In vielen Fällen kann man STOP- 
Befehle durch einfache PRINT- 
Anweisungen ersetzen. Das hat den 
Vorteil, daß keine Programmunter¬ 
brechung stattfindet und man nicht 
jedesmal CONT eintippen muß. Au¬ 
ßerdem kann man in PRINT- 
Anweisungen auch zusätzliche In¬ 
formationen geben, zum Beispiel Va¬ 
riablenwerte ausdrucken oder di¬ 
rekt auf ein spezielles Problem auf¬ 
merksam machen. Diese PRINT- 
Anweisungen sollten aber in irgend¬ 
einer Weise von den normalen Bild¬ 
schirmausgaben unterschieden 
sein. Zum Beispiel kann man jede 
PRINT-Anweisung zur Fehlersuche 
mit fünf Sternchen oder fünf Pluszei¬ 
chen beginnen lassen. 

Wül man sich mehrere Variable 
während des Programmlaufs aus¬ 
drucken lassen, sind kleine Unter¬ 
programme recht hilfreich, die in ei¬ 


nen freien Zeilenbereich geschrie¬ 
ben werden und die alle benötigten 
Ausgaben durchführen. Am Ende 
solcher Unterprogramme sollte eine 
GET-Schleife stehen, die das Pro¬ 
gramm auf Tastendruck weiterlau¬ 
fen läßt. Statt langer PRINT-Listen 
braucht man so nur einen GOSUB- 
Aufruf überall dort im Programm 
einzufügen, wo dies sinnvoll er¬ 
scheint. 


Komfortables Debugging 
mit Basic-Erweiterungen 


Das Arbeiten mit STOP und CONT 
mag manchem Computerneuling et¬ 
was ungewohnt erscheinen, aber es 
ist jedenfalls ein recht sicheres Mit¬ 
tel, einem immer wieder abstürzen¬ 
den Programm auf die Schliche zu 
kommen. 

Leider sind STOP und CONT auch 
schon die einzigen speziellen 
Debug-Befehle im Commodore- 
Basic. Viele Spracherweiterungen, 
wie zum Beispiel das bekannte Si¬ 
mons Basic oder Exbasic Level II, 
stellen zusätzliche Funktionen zur 
schnellen Fehlersuche zm Verfü¬ 
gung. Wichtige derartige Befehle 
sind zum Beispiel 

* TRACE — listet während des Pro¬ 
grammlaufs die gerade bearbeite¬ 
ten Programmzeilen oder zumindest 
die Zeilennummern auf. 

* DUMP —gibt eine Liste aller Varia¬ 
blen mit ihren derzeitigen Werten 
aus. 

* FIND — sucht im Direktmodus eine 
Zeichenfolge im Programm. 

* ON ERROR GOTO ... — ermöglicht die 
Fehlerbehandlung im Programm 
selbst (ohne Abbruch). 

Wenn der Computer jedoch noch 
in manierlicher Weise seine Fehler¬ 
meldungen ausgibt, sind aufwendi¬ 
ge Verfahren zumeist nicht nötig, 
denn zusammen mit der Meldung 
über die Art des Fehlers erfährt man 
ja auch die Zeilennummer des Auf¬ 
tretens. 


Syntax Error: Wenn der 
Computer nur noch 
»Bahnhof« versteht 


Die häufigste Fehlermeldung ist si¬ 
cherlich der ungeliebte »SYNTAX 
ERROR«. Böse Zungen behaupten 
allerdings, beim VC 20 wäre es der 


»OUT OF MEMORY ERROR«. Wie 
dem auch sei, solange der Compu¬ 
ter nur Syntax-Fehler meldet, kann 
man noch von Glück reden. Es han¬ 
delt sich dabei meistens um einfa¬ 
che Tippfehler, die nach auflisten 
der entsprechenden Zeile leicht zu 
finden und zu korrigieren sind. Be¬ 
liebte Fehler sind zum Beispiel feh¬ 
lende oder überzählige Klammern 
und die Verwechselung ähnlicher 
Zeichen, wie zum Beispiel »0« und 
»O«, »1« und »I« oder »8« und »B«. Sehr 
häufig ist auch die Verwechslung 
von Punkt und Komma, was sich be¬ 
sonders in DATA-Zeilen verhängnis¬ 
voll auswirken kann, wie wir nach¬ 
her noch sehen werden. Wenn Sie 
also irgendwo einen »SYNTAX ER¬ 
ROR« gemeldet bekommen und in 
der fraglichen Zeile auf Anhieb kei¬ 
nen Fehler finden, dann gehen Sie 
zuerst die vorhin genannten Punkte 
durch. 

Eine gute Hilfe ist es, mit dem Cur¬ 
sor die fehlerhafte Zeile Zeichen für 
Zeichen abzufahren und dabei mit 
der Vorlage zu vergleichen. Kom¬ 
men in der Fehlerzeile viele Klam¬ 
mern vor, dann empfiehlt sich häufig 
das Anlegen zweier Strichlisten für 
öffnende und schließende Klam¬ 
mern. Die Anzahlen müssen inner¬ 
halb jeder Basic-Anweisung über¬ 
einstimmen. Aber bitte keine Klam¬ 
mern mitzählen, die in Anführungs¬ 
zeichen stehen; diese haben mit der 
Syntax nichts zu tun. 


Syntax-Fehler, die man 
nicht sehen kann 


Ab und zu kann es Vorkommen, 
daß man bei aller Sorgfalt einen Syn¬ 
taxfehler nicht findet, wie zum Bei¬ 
spiel in der folgenden Basic-Zeile: 

10 OPEN 1,4:PRINT # 1,"HALLO": 
CLOSE 1 

Wenn der Computer hier den¬ 
noch einen Syntaxfehler meldet, 
dann kann das nur eine Ursache ha¬ 
ben: Bei der Eingabe dieser Zeile 
wurden die Basic-Befehle in der be¬ 
kannten Art und Weise abgekürzt. 
Der zweite Befehl wurde also als 
»? # 1« eingegeben, was beim Aufli¬ 
sten wieder zu »PRINT # 1« wird. Lei¬ 
der sind PRINT und PRINT# zwei 
völlig verschiedene Befehle, genau¬ 
so wie INPUT und INPUT# oder 
GET und GET#. Alle diese 
#-Befehle darf man daher nie ab¬ 
kürzen. Die normalen PRINT-, 
INPUT- und GET-Routinen wissen 
nämlich mit dem nachfolgenden»#« 
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nichts anzufangen und es kommt zu 
einer Fehlermeldung. 

Eine ähnliche Situation kann sehr 
leicht bei Verwendung langer Varia¬ 
blennamen auftreten. In einem 
Spielprogramm »Schiffe versenken« 
kann zum Beispiel die folgende Zei¬ 
le auftreten: 

10 ANZAHLSCHIFFE = 12 
In dieser Zeile wird unweigerlich 
ein »SYNTAX ERROR« auftreten, 
weil der Computer innerhalb des 
Variablennamens »ANZAHLSCHIF¬ 
FE« das Basic-Schlüsselwort »IF« ent¬ 
deckt und sich bei aller Anstren¬ 
gung nicht erklären kann, was eine 
IF-Abfrage an dieser Stelle soll. Trotz 
aller Vorteile für die Übersichtlich¬ 
keit eines Programms sei daher an 
dieser Stelle von der Benutzung lan¬ 
ger Variablennamen abgeraten. 

Was tun bei »OUT 0F 
DATA«? 


Eine andere häufig auftretende 
Fehlermeldung ist vor allem bei An¬ 
fängern gefürchtet, nämlich der 
»OUT OF DATA ERROR«. Gefürchtet 
ist dieser Fehler vor allem deswe¬ 
gen, weil die Zeilennummer, die der 
Computer zu dieser Fehlermeldung 
ausgibt, m den allermeisten Fällen 
keinen Hinweis darauf gibt, an wel¬ 
cher Stelle denn nun ein Fehler vor¬ 
liegt. Listet man nämlich die fehler¬ 
hafte Zeile am Bildschirm auf, so fin¬ 
det man dort nur den READ-Befehl, 
für den keine DATAs mehr vorhan¬ 
den waren. In der Regel steht dieser 
READ-Befehl innerhalb einer FOR- 
NEXT-Schleife. Ein typisches, wenn 
auch stark vereinfachtes Beispiel für 
das Auftreten von Fehlem im Zusam¬ 
menhang mit DATA-Anweisungen ist 
in Listing 1 auf Seite 50 gegeben. In 
den Zeilen 100 bis 170 wird eine Prüf¬ 
summe über den ersten DATA-Block 
gebüdet, und nur dann, wenn diese 
Prüfsumme in Ordnung ist, wird in 
den nächsten Programmteil ver¬ 
zweigt, wo aus dem zweiten DATA- 
Block Zahlen gelesen und an den 
Anfang des Bildschirms gePOKEt 
werden und dort das Wort »COM- 
MODORE« bilden sollen. 

Das Programm enthält nun einige 
Fehler in den DATA-Zeilen, die wir 
gemeinsam herausfinden wollen. 
Stellen wir uns einfach vor, wir hät¬ 
ten das Programm in Listing 1 aus ei¬ 
ner Zeitschrift abgetippt und dabei 
einige Fehler in den DATA-Zeilen fa¬ 
briziert. In Listing 2 sind zum Ver¬ 
gleich noch einmal die entsprechen¬ 
den DATA-Zeilen des »Original«- 
Listings abgedruckt. Die Fehlersu¬ 


che scheint somit recht einfach: Man 
vergleicht die paar DATAs in beiden 
Listings und wird dann schon den 
Fehler finden. Bei diesem kurzen 
Testprogramm stimmt das natürlich 
auch. Aber stellen wir uns doch ein¬ 
mal vor, daß die beiden DATA- 
Blöcke insgesamt vielleicht über 
drei volle Listing-Seiten gehen und 
nicht nur über drei Zeilen wie in un¬ 
serem Beispiel. Dann lohnt es sich 
nämlich mit Sicherheit schon, wenn 
man etwas systematischer an die 
Fehlersuche herangeht. 

Zuerst starten wir unser Pro¬ 
gramm nach Listing 1 einmal ganz 
arglos mit RUN, nachdem wir es vor¬ 
her auf Kassette oder Diskette abge¬ 
speichert hatten. Der Programmver¬ 
lauf ist zu Anfang ganz wie erwartet: 
Der Bildschirm wird gelöscht, es er¬ 
scheint die Meldung »S = 270« und 
darunter »OK«, dann jedoch erschei¬ 
nen am oberen Bildschirmrand statt 
eines längeren Wortes nur die bei¬ 
den Zeichen »@« und »C« und das 
Programm bricht mit der Meldung»? 
ILLEGAL QUANTITY ERROR IN 
230« ab. Was ist hier geschehen? 

Wenn wir uns Zeile 230 einmal auf¬ 
listen lassen, dann sehen wir 

230 POKEB + I.X 

Da wir wissen, daßnui zahlen zwi¬ 
schen 0 und 255 gePOKEt werden 
können, vermuten wir den Fehler 
beim Wert der Variablen X. Um un¬ 
sere Vermutung zu bestätigen, fra¬ 
gen wir den Computer doch einmal 
ganz einfach nach dem Wert von X, 
indem wir eintippen 

PRINT X 

und danach die RETURN-Taste betä¬ 
tigen. Wir erhalten als Antwort den 
Wert 1513, der tatsächlich zu groß ist, 
um in eine Speicherzelle zu passen. 
Wir vergleichen den zweiten DATA- 
Block mit dem Original (Listing 2) 
und stellen fest, daß wir bei der Ein¬ 
gabe das Komma zwischen den bei¬ 
den Zahlen 15 und 13 in Zeile 360 ver¬ 
gessen haben. Das ändern wir, in¬ 
dem wir das Komma nachträglich 
einfügen. Dank dieses schnellen Er¬ 
folges bessert sich unsere Stim¬ 
mung um einiges, was sich jedoch 
nach dem nächsten RUN sehr 
schnell wieder ändert. Zwar er¬ 
scheint am Bildschirm zunächst ganz 
ordentlich die Prüfsumme des er¬ 
sten DATA-Blocks und das dazuge¬ 
hörige »OK«, aber am oberen Bild¬ 
schirmrand stimmt einiges noch 
nicht: Man liest dort die Zeichenfol¬ 
ge »@COMMOORE« statt »COM- 
MODORE«. 

Auf den ersten Blick würde man 
vielleicht vermuten, daß der Fehler 
nur im zweiten DATA-Block stehen 


kann, weil das Lesen des ersten 
Blocks keine Fehlermeldung er¬ 
zeugt und sogar die Prüfsummenbil¬ 
dung stimmt. Diese Überlegung ist 
aber nicht ganz schlüssig. Denn 
durch Bildung einer einfachen Prüf¬ 
summe werden Vertauschungsfeh¬ 
ler und überflüssige oder fehlende 
Nullen nicht erkannt. Die fünf DATA- 
Zeilen in Listing 3 ergeben zum Bei¬ 
spiel alle die gleiche Prüfsumme. 

Man sollte sich also nie blindlings 
auf Prüfsummen verlassen. Sie sind 
zwar oft nützlich, um Fehler in DATA- 
Zeilen festzustellen, man darf aber 
aus der Richtigkeit der Prüfsum¬ 
menprobe niemals auf die Abwe¬ 
senheit von Fehlern schließen. Au¬ 
ßerdemtaucht eine weitere Schwie¬ 
rigkeit auf: Wenn man nur eine glo¬ 
bale Prüfsumme über alle DATAs 
büdet, dann kann man zwar unter 
Umständen einen Fehler nachwei- 
sen, weiß aber immer noch nicht, wo 
er steckt. Da muß man dann schon zu 
anderen Mitteln greifen. 


Mit Listing, Lupe und 
Logik« Dem Fehler 
auf der Spur 

Um den Fehler aufzuspüren, kön¬ 
nen wir dem Computer einen gro¬ 
ßen Teil der Arbeit überlassen. Als 
erstes wollen wir feststellen, in wel¬ 
chem der beiden DATA-Blöcke der 
Fehler liegen könnte. Dazu veranlas¬ 
sen wir den Computer einfach, nur 
den ersten DATA-Block zu lesen, in¬ 
dem wir eine STOP-Anweisung hin¬ 
ter die erste FOR-NEXT-Schleife pla¬ 
zieren. Wir fügen also folgende Zei¬ 
le ins Programm ein: 

145 STOP 

Wenn wir das Programm jetzt star¬ 
ten, erhalten wir die Meldung »BRE¬ 
AK IN 145«, die von unserem STOP- 
Befehl herrührt. Da aber das Pro¬ 
gramm bis Zeile 145 durchlaufen 
wurde, muß der erste DATA-Block 
an dieser Stelle vollständig gelesen 
worden sein. Die Variable X enthält 
natürlich immer noch den zuletzt ge¬ 
lesenen DATA-Wert. Wenn dieser 
Programmteil richtig gearbeitet hat, 
dann müßte X jetzt den Wert Null ha¬ 
ben, denn dies ist ja gerade der letz¬ 
te DATA-Wert aus Block 1, wie man 
anhand von Listing 1 oder 2 un¬ 
schwer erkennen kann. Das können 
wir einfach nachprüfen, indem wir 
den Computer nach dem Wert von X 
fragen: 

PRINT X 

Zu unserem Erstaunen ist die Ant¬ 
wort aber nicht 0, sondern 12. Wir 
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werfen wieder einen Blick auf Li¬ 
sting 1 und stellen fest, daß die Zahl 
12 die vorletzte Zahl im ersten DÄIÄ- 
Block ist. Offenbar wurde eine Zahl 
zuwenig gelesen! Es ist nun ver¬ 
lockend, einfach den End wert der 
ersten FOR-NEXT-Schleife um eins 
zu erhöhen, um alle Werte des er¬ 
sten Blocks zu lesen. Doch halt, hier 
ist Vorsicht geboten. Viel wahr¬ 
scheinlicher als ein Fehler in einer 
FOR-NEXT-Schleife ist ein Fehler in¬ 
nerhalb der DATA-Zeilen. Bei so vie¬ 
len Zahleneingaben kann man sich 
schließlich leicht mal vertippen. Be¬ 
trachten wir das Problem also ein¬ 
mal von der anderen Seite. Wenn die 
Anzahl der gelesenen X-Werte 
stimmt, das Programm aber trotz¬ 
dem nur bis zum vorletzten DATA- 
Wert kommt, dann enthält Block 1 
vielleicht einen DATA-Wert zuviel. 
Wir wollen also die DATAs in Block 1 
ganz gezielt überprüfen. Dazu 
schreiben wir in einen freien Zeilen¬ 
bereich, zum Beispiel ab Zeile 1000, 
das folgende kleine Unterpro¬ 
gramm: 

1000 PRINT "1 = ” ; I, ”X ; X 

1010 GET A$ : IF A$ < > CHR$(32) 
THEN 1010 
1020 RETURN 

In die erste FOR-NEXT-Schleife fü¬ 
gen wir direkt hinter die READ- 
Anweisung einen Aufruf dieses Un¬ 
terprogramms ein: 

125 GOSUB 1000 

Wenn wir das Programm nun lau¬ 
fen lassen, geschieht folgendes: Der 
Computer gelangt mit Zeile 110 in die 
Leseschleife. In Zeile 120 wird je¬ 
weils ein DATA-Element gelesen. 
Dann erfolgt mit der eingefügten 
Zeile 125 em Sprung m das vorhin 
geschriebene Unterprogramm. Die¬ 
ses Unterprogramm druckt den 

Wert der Zählvariablen I und den 

soeben gelesenen DATA-Wert X aus 
und wartet dann, bis die Leertaste 
betätigt wird. Dann kehrt das Unter¬ 
programm zurück und die Schleife 
wird nach dem NEXT in Zeile 140 er¬ 
neut durchlaufen, Auf diese Art und 
Weise erhält man am Bildschirm ei¬ 
ne übersichtliche Darstellung der 
gelesenen DATA Werte, die man 
leicht mit der Vorlage vergleichen 
kann. Wenn wir das Programm ietzt 
starten, erhalten wir jeweils nach 
Drücken der Leertaste eine Bild- 
schirmanzeige, etwa in der folgen¬ 
den Art: 

1=1 X = 12 
1=2 X = 33 
1 = 3 X = 11 

und so weiter bis schließlich das En¬ 
de von DATA-Zeile 310 erreicht wird: 
1 = 9 X = 18 
I = 10 X = 0 


Nanu? Das hatten wir eigentlich 
nicht erwartet. X=18 ist der letzte 
Wert in Zeile 310, und danach sollte 
eigenlich der erste Wert aus der 
nächsten DATA-Zeile gelesen wer¬ 
den, nämlich X = ll. Woher also 
kommt dieser Wert Null bei 1 = 10? 
Ein Vergleich von Zeile 310 in Listing 
1 (abgetippt) mit Listing 2 (Original) 
führt uns auf des Rätsels Lösung. Of¬ 
fenbar haben wir beim Abtippen am 
Ende von Zeile 310 noch ein Komma 
gesetzt, was da nicht hingehört. Ein 
Komma in einer DATA-Anweisung 
trennt für unseren Commodore- 
Computer aber immer zwei Werte 
voneinander, und da er hinter dem 
letzten Komma nichts mehr findet, 
setzt er kurzerhand den Wert Null 
dafür an. 

Damit haben wir den überzähli¬ 
gen DATA-Wert im ersten Block ge¬ 
funden. Wir entfernen das Komma 
in Zeile 310, löschen die Zeile 125 mit 
dem GOSUB-Befehl und ebenso die 
Zeile 145 mit dem nun nicht mehr be¬ 
nötigten STOP-Befehl. 

Ein erneuter Probelauf des Pro¬ 
gramms schreibt die Zeichenfolge 
»COMMOORE« links oben in den 
Bildschirm — und bringt die Fehler¬ 
meldung »OUT OF DATA ERROR IN 
220«. Nach Auflisten der Ze^e 220 se¬ 
hen wir leider nur 
220 READ X 

Das bringt uns nicht viel weiter. 
Die Fehlermeldung und das ver¬ 
stümmelte Wort »COMMOORE« 
am oberen Bildschirmrand deuten 
aber auf einen fehlenden DATA- 
Wert in Block 2 hin. Untersuchen wir 
also Block 2 einmal genauer. Das 
Unterprogramm zum Ausdrucken 


der Werte von I und X am Büdschirm 
befindet sich ja ab Zeile 1000 noch im 
Speicher. Wir brauchen daher nur 
einen entsprechenden GOSUB-Be¬ 
fehl in die zweite Leseschleife einzu¬ 
fügen, am besten gleich nach dem 
READ-Befehl, also etwa in Zeile 225: 
225 GOSUB 1000 

Wir erhalten wieder eine leicht zu 
überprüfende Liste aller DATA¬ 
Werte, diesmal aus Block 2. Bei 1 = 4 
fällt uns sofort etwas auf. Am Bild¬ 
schirm erscheint nämlich 
I = 4 X = 15.4 

Das ist die einzige Zahl mit Nach¬ 
kommastellen, was bei dieser Art 
der Bildschirmausgabe sofort ins 
Auge sticht. Wir vergleichen den 
Wert mit der Eintragung im Original- 
listing und sehen sofort den Fehler: 
Wir haben beim Abtippen irrtüm¬ 
lich einen Punkt statt eines Kommas 
eingegeben. Die Korrektur ist leicht 
ausgeführt. 

Danach löschen wir Zeile 225 mit 
dem GOSUB 1000 wieder und über¬ 
zeugen uns durch einen abschlie¬ 
ßenden Probelauf vom einwandfrei¬ 
en Funktionieren des Programms. 

Natürlich kann man nicht erwar¬ 
ten, daß sich alle Fehler so reibungs¬ 
los lokalisieren lassen wie in unse¬ 
rem kleinen Beispiel. Gerade bei 
Fehlern in DATA-Zeilen kann die Su¬ 
che sich namentlich bei längeren 
DATA-Blöcken um einiges schwieri¬ 
ger gestalten. Aber bei Program¬ 
men mit vielen DATA-Zeüen sind die 
hier beschriebenen Methoden zum 
Auffinden von versteckten Fehlem 
einfach unentbehrlich, wenn man ei¬ 
nigermaßen schnell und sicher zum 
Ziel gelangen will. (ev) 
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i REM DATA-TEST 

3 REM 

4 REM 

5 B~ 1024: REM ANF ANGSADRESSE BI L.DSCi 11 EM BE I C 64 

6 REM 

7 PR I NT " :: REM B I LOSCH X RM LÜESCHEN 

ci PR IN T : PR IMT: PR INT:: PR l NT 

9 REM 

100 REM DATA.BLOCK 1 LESEN 

105 REM 

110 FOR I«1 TG-17 

J. 20 READ X 

130 S=S+X 

140 NEX^ I 

150 PRI NT "S = " ;S 

160 IF S< >282 THEM PRINT "PRUEFSUMMENFEHLER":END 
170 PRINT "OK" 

190 REM 
193 REM 

200 REM DATA.BLOCK 2 LESEN 

205 REM 

210 FÜR 1=0 TO 8 

220 READ X 

230 PC)KE B+I,X 

240 NEXT I 

250 END 

290 REM 

295 REM 

300 REM DATA BLOCK 1 
305 REM 

310 DATA 12,33,11,4,17,38,22,19,7,18, 

320 DATA 11,41,15,19,3,12,0 
345 REM 

330 REM DATA BLOCK 2 
355 REM 

360 DATA 3 , 1513,13,15.. 4,15,18,5 
READY„ 


Listing 1: In diesem Testprogramm sind einige 
Fehler in den DATA-Zeilen enthalten. 




290 REM 
295 REM 

300 REM DATA BLOCK 1 
305 REM 

310 DATA 12,33,11,4,17,38,22,19,7,18 
320 DfilA 11,41,15,19,3,12,0 
345 REM 

350 REM DATA BLOCK 2 ' 

355 REM 

360 DATA 3,15,13,13.15,4.15,18,5 
READY. 


Listing 2: Dies ist nochmals der DATA-Block aus Li¬ 
sting 1, aber diesmal das fehlerfreie »Original«. 


Listing 3: Die Bildung einer Prütsumme ist kein zuver¬ 
lässiges Mittel, um Fehler in DATA-Zeilen zu ent¬ 
decken. Wie man leicht nachrechnen kann, ergibt jede 
der sechs DATA-Zeilen die gleiche Priifsumme. 


100 DATA 12,13,14,15,16,17,0 
200 DATA 13,12,14,15,16,17,0 
300 DATA 13,12,14,15,16,17,0,0,0 
320 DATA 11,13,14,15,16,18,0 
400 DATA 23,2,14,15,16,17,0 
500 DATA 23,2,14, .13,16,, 17 

READY. 
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C 64/VC 20 


Der Volkscomputer und der große Bruder: 
Adressenvergleich VC 20 - C 64 


Der Commodore 64 wird oft als der »große Bruder» des 
VC 20 bezeichnet. Tatsächlich sind zum Beispiel 
Betriebssystem, Basicinterpreter und Schnittstellen 
weitgehend identisch. Daher können Basicprogramme, 
in denen keine Befehle und Funktionen wie POKE, 
PEEK, SYS und USR Vorkommen, praktisch unverändert 

übertragen werden. 



C 64 

VC20 

(Grundver¬ 

sion) 

VC 20 
(ab 8 K- 
Erw.) 

VC 20 

Video RAM 

1024 

7680 

4096 

Video-RAM 

freier RAM-Bereich 

2048 

4096 

4608 

freier RAM-Bereich 

Zeichengenerator- 

53248 

32768 

32768 

Zeichengenerator- 

ROM 

Video-Chip (VIC) 

53248 

36864 

36864 

ROM 

Video & Sound 

Syntheziser Chip 

54272 

_ 

_ 

Chip 

(SID) 

I/O 1 (CIA # 1) 

56320 

37136 

37136 

I/O 1 (VIA#1) 

I/O 2 (CIA #2) 

56576 

37152 

37152 

I/O 2 (VIA #2) 

FARB-RAM 

55296 

38400 

37888 

Farb-RAM 

Basic-ROM 

40960 

49152 

49152 

Basic-ROM 


Tabelle 1. Die Basisadressen wichtiger Speicher- und Registertiereiche 


L eider wird man derartige Pro¬ 
gramme nur sehr selten finden, 
da beide Computer Grundle¬ 
gendes gemeinsam haben: Die 
Hardwareeigenschaften werden 
von der Software — sprich vom Basic 
— kaum unterstützt. Immer dann, 
wenn die grafischen oder musikali¬ 
schen Fähigkeiten von C 64 und VC 
20 angesprochen werden, ge¬ 
schieht dies durch POKE-Befehle, 
auch wenn es nur darum geht, zum 
Beispiel die Farbe des Büdschirm- 
rahmens einzustellen. 

Das allein wäre ja noch nicht so 
schlimm. Nun ist aber die entspre¬ 
chende Hardware, also Video- und 
Soundchip, bei beiden Computern 
grundlegend verschieden aufge¬ 
baut und belegt zudem noch völlig 
unterschiedliche Adressen im Spei¬ 
cher. So ist es kein Wunder, wenn 
das Umschreiben von C 64-Pro- 
grammen auf den VC 20 (und umge¬ 
kehrt) in der Regel mit erheblichen 
Schwierigkeiten verbunden ist. Wir 
wollen im folgenden versuchen, ei¬ 
ne ganze Reihe dieser Schwierigkei¬ 
ten aus dem Weg zu räumen. Als er¬ 
ste grobe Übersicht soll dabei die 
Tabelle 1 dienen. Auf weitere Einzel¬ 
heiten wird im folgenden näher ein¬ 
gegangen. 

Bevor man daran gehen kann, für 
den jeweils anderen Computer ge¬ 
schriebene Software an den eige¬ 
nen C 64 oder VC 20 anzupassen, 
müssen die Programme erst einmal 
in den Speicher gebracht werden. 
Ein Blick auf die Modulschächte 
beider Computer verrät sofort, daß 
es mit dem Austausch von Steckmo¬ 
dulen nicht allzu weit her sein kann: 
Das Modulformat ist völlig unter¬ 
schiedlich. 

Leider ist auch der Softwareaus¬ 
tausch per Programmkassette nur 
über einen Umweg zu realisieren. 
Zwar ist das Aufzeichnungsformat 
auf Cassette bei beiden Computern 
gleich, dennoch kann der eine Com¬ 
puter die Aufzeichnungen des an¬ 
deren in den meisten Fällen nicht le¬ 
sen. Der Grund hierfür liegt darin, 
daß der VC 20 eine höhere Taktfre¬ 
quenz als der C 64 hat (VC 20-Pro- 
gramme sind um einiges schneller 
als entsprechende C 64-Program- 

52 iötei* 


me). Dadurch gerät beim Lesen ei¬ 
ner fremden Kassette die Synchro¬ 
nisation völlig aus den Fugen. Den 
einzigen Ausweg in dieser Situation 
bietet die Verwendung eines »gro¬ 
ßen« CBM der Serien 30xx oder 
40xx als Vermittler. Die Taktfre¬ 
quenz dieser CBM-Rechner liegt 
zwischen der des C 64 und der des 
VC 20, wodurch es zum Beispiel 
möglich ist, VC 20 Programme zu¬ 
nächst mit dem CBM zu laden, dann 
wieder abzuspeichern und nun wie¬ 
derum mit dem C 64 zu laden. 

Beim Programmaustausch per 
Floppy-Disk treten solche Probleme 
nicht auf. Hier kann man nach Her¬ 
zenslust VC 20-Software in den C 64 
laden oder auch umgekehrt. Hat 
man allerdings keine Floppy oder 
liegt das interessierende Programm 
nicht auf Diskette vor, dann bleibt in 
der Regel nur noch eins zu tun: Die 
Zähne zusammenbeißen und das 
Programm vom Listing abtippen. 
Dabei kann man dann auch gleich 
alle nötigen Programmänderungen 
vornehmen. 


Leider gibt es viele Programme 
sowohl für den VC 20 als auch für 
den C 64, die man nicht durch Än¬ 
dern einiger POKE-Adressen und 
kleinen Korrekturen am Bildschirm¬ 
layout an den jeweüs anderen Com¬ 
puter anpassen kann. 

Dazu gehören generell alle Pro¬ 
gramme, die hochauflösende Grafik 
verwenden. Die Prinzipien, nach 
dem die hochauflösende Grafik auf 
den beiden Computern realisiert ist, 
sind völlig unterschiedlich. Außer¬ 
dem ist es natürlich von vorne her¬ 
ein völlig aussichtslos, ein C 64-Pro- 
gramm, das Sprites und Synthesi¬ 
zereffekte einsetzt, für den VC 20 
umschreiben zu wollen. Umgekehrt 
gibt es eine solche Einschränkung 
allerdings nicht — der VC 20 kennt 
keine Sprites und sein Tongenerator 
läßt sich mit dem Synthesizer des 
C 64 allemal simulieren. 

Sehr viel Vorsicht ist geboten, 
wenn das Programm längere Ab¬ 
schnitte in Maschinensprache ent¬ 
hält. Oftmals müssen diese Maschi¬ 
nenspracheroutinen in andere Spei- 
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cherbereiche verschoben werden, 
um gemeinsam mit dem Basic-Pro- 
gramm laufen zu können. Wir wollen 
uns an dieser Stelle aber nur mit den 
Anpassungen bei Basic-Program- 
men beschäftigen. 


POKE-Befehle für Farbe 
und Bildschirm 

Selbst die einfachsten Program¬ 
me enthalten in der Regel Befehle, 
um Rahmen- und Hintergrundfarbe 
des Bildschirms einzustellen. Beim 
VC 20 werden beide Einstellungen 
gleichzeitig mit einem einzigen 
POKE-Befehl in Register 36879 
durchgeführt (Tabelle 2). Der C 64 
verwendet zwei getrennte Register, 
nämlich 53280 für die Rahmenfarbe 
und 53281 für die Hintergrundfarbe. 
Jeweils 16 Farben sind möglich (Ta¬ 
belle 3). Zum Beispiel erzeugt der 
Befehl POKE 36879,95 beim VC 20 
einen gelben Bildschirmrahmen 
und einen grünen Hintergrund. Mit 
POKE 53280,7 : POKE 53281,5 wird 
dasselbe am C 64 erreicht, 

Beim C 64 enthält der Bildschirm 
25 Zeilen zu je 40 Zeichen; der Bild¬ 
schirmspeicher belegt die Adres¬ 
sen 1024 bis 2023. Der zugehörige 
Farbspeicher geht von 55296 bis 
56295. Mit POKE 1024, 1 : POKE 
55296, 2 erscheint zum Beispiel ein 
rotes »A« in der linken oberen Bild¬ 
schirmecke. Der für den Anwender 
verfügbare RAM-Bereich beginnt 
bei Adresse 2048 (Bild 1). 

Beim VC 20 wird die Angelegen¬ 
heit etwas komplizierter. Die An¬ 
fangsadressen von Bildschirm- und 
Farbspeicher sind nämlich je nach 
Speicherausbau unterschiedlich 
(Bild 2). In der Grund Version und mit 
der 3-KByte-Erweiterung beginnt 
das Video-RAM bei Adresse 7680 
und geht bis Adresse 8185. Das 
Farb-RAM belegt dann den Bereich 
von 38400 bis 38905. In dieser Konfi¬ 
guration liegt der Bildschirmspei¬ 
cher oberhalb des für den Anwen¬ 
der verfügbaren RAM-Bereiches, 
der ab Adresse 4096 (Grundversion) 
beziehungsweise 1024 (3-KByte-Er¬ 
weiterung) beginnt. Sobald jedoch 
eine Speichererweiterung von min¬ 
destens 8 KBytes eingesteckt ist, 
wandert das Video-RAM nach »un¬ 
ten» und beginnt dann ab Adresse 
4096. Dies geschieht, um für Basic- 
Programme einen zusammenhän¬ 
genden Speicherbereich von der 
Adresse 4608 an aufwärts zu schaf¬ 
fen. Eine eventuell zusätzlich vor¬ 
handene 3-KByte-Erweiterung kann 
in diesem Fall nicht für Basic-Pro- 
gramme genutzt werden. Schließ¬ 



BLK 

WHT 

RED 

CYAN 

PUR 

GRN 

BLU 

YEL 

Hintergrund 

SCHW 

WEISS 

ROT 

TÜR¬ 

KIS 

VIO¬ 

LETT 

GRÜN 

BLAU 

GELB 

SCHWÄRZ 

8 

9 

10 

11 

12 

13 

14 

15 

WEISS 

24 

25 

26 

27 

28 

29 

30 

31 

ROT 

40 

41 

42 

43 

44 

45 

46 

47 

TÜRKIS 

56 

57 

58 

59 

60 

61 

62 

63 

VIOLETT 

72 

73 

74 

75 

76 

77 

78 

79 

GRÜN 

88 

89 

90 

91 

92 

93 

94 

95 

BLAU 

104 

105 

106 

107 

108 

109 

110 

111 

GELB 

120 

121 

122 

123 

124 

125 

126 

127 

ORANGE 

136 

137 

138 

139 

140 

141 

142 

143 

HELLORAN. 

152 

153 

154 

155 

156 

157 

158 

159 

ROSA 

168 

169 

170 

171 

172 

173 

174 

175 

HELLTÜRKIS 

184 

185 

186 

187 

188 

189 

190 

191 

HELLVIOL. 

200 

201 

202 

203 

204 

205 

206 

207 

HELLGRÜN 

216 

217 

218 

219 

220 

221 

222 

223 

HELLBLAU 

232 

233 

234 

235 

236 

237 

238 

239 

HELLGELB 

248 

249 

250 

251 

252 

253 

254 

255 


Tabelle 2. Farbkombinationen für Bildschirmrahmen und Hintergrund beim VC 20 


VC 20 und C 64 

: ■ C 64 

0 

schwarz 

8 

orange 

1 

weiß 

9 

braun 

2 

rot 

10 

hellrot 

3 _ 

türkis 

11 

grau 1 

4‘ 

violett 

12 

grau 2 

5 

grün 

13 

hellgrün 

6 

blau 

14 

hellblau 

7 

gelb 

15 

grau 3 


Tabelle 3. Farbwerte bei C 64 und VC 20 

lieh verändert auch noch das Farb- 
RAM seine Lage und startet jetzt bei 
Adresse 37888. 

Der Bildschirm des VC 20 ist auf¬ 
geteilt in 23 Zeilen zu je 22 Zeichen. 
Insgesamt sind also 506 Bildschirm¬ 
stellen vorhanden, das sind etwa 
halb soviele wie beim C 64. Eine An¬ 
passung des Bildschirmlayouts ist al¬ 
so in fast allen Fällen erforderlich. In 
der Regel dürfte das kein Problem 
darstellen. Bei der Anpassung von 
VC 20-Programmen an den C 64 
wird man des öfteren PRINT-Anwei- 
sungen zusammenfassen, da eine 
Bildschirmzeile beim C 64 fast dop¬ 
pelt soviele Zeichen wie eine ent¬ 
sprechende VC 20-Zeile aufnehmen 
kann. Im umgekehrten Fall ist das 
Einfügen von PRINT-Befehlen sinn¬ 
voll, um eine übersichtliche Bild¬ 
schirmdarstellung zu erhalten. Ern¬ 
ste Schwierigkeiten kann es nur bei 
der Ausgabe von Tabellen auf dem 
Bildschirm geben. Eine sechsspalti- 


ge Zahlentabelle zum Beispiel läßt 
sich auf dem C 64 ganz gut darstel¬ 
len, beim VC 20 wird man bei derar¬ 
tigen Versuchen unangenehm an 
die arg begrenzte Zeilenbreite erin¬ 
nert. In solchen Fällen kann man 
versuchen, weniger interessante 
Spalten der Tabelle einfach fortzu¬ 
lassen. Wenn das nicht erwünscht 
oder möglich ist, hilft nur noch der 
CMD-Befehl, um die Ausgabe der 
entsprechenden Tabelle auf den 
Drucker umzuleiten. 

Das Betriebssystem von C 64 und 
VC 20 ist weitgehend identisch. Na¬ 
türlich gibt es einige Unterschiede 
bei den Ein-/Ausgabeoperationen, 
bedingt schon alleine durch das un¬ 
terschiedliche Bildschirmformat. 
Fast alle nutzbaren Adressen in der 
Zeropage oder in den anderen vom 
Betriebssystem benutzten Speicher¬ 
bereichen haben jedoch die glei¬ 
che Bedeutung. So befindet sich 
zum Beispiel bei beiden Computern 
der Kassettenpuffer zwischen den 
Adressen 828 und 1019 und mit »? 
PEEK(43) + 256 * PEEK(44)« erhält 
man beidesmaldie Anfangsadresse 
des Basic-Programms. 

Eine wichtige Ausnahme von die¬ 
ser Regel ist der USR-Vektor, Beim 
VC 20 befindet er sich in den Spei¬ 
cherstellen 1 und 2 am Anfang der 
Zeropage, in Adresse 0 steht immer 
ein »JMP«-Befehl. Jedesmal bei der 
Ausführung der USR-Funktion ver- 
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zweigt das Basic zur Adresse 0 und 
aufgrund des dort stehenden »JMP« 
sofort weiter zur Adresse, die in sich 
in den Speicherzellen 1 und 2 befin¬ 
det. Beim C 64 befinden sich dage¬ 
gen am Anfang der Zeropage zwei 
Register des 6510-Mikroprozessors, 
so daß der USR-Vektor hier in die 


$C000 und $DFFC entsprechen den 
C 64 Adressen zwischen $A000 und 
$BFFC, die Differenz ist also gerade 
$2000 oder dezimal 8192. In Adresse 
$BFFD steht beim C 64 ein Sprung 
nach $EOOO, um den RAM- und I/O- 
Bereich zwischen $C000 und $DFFF 
zu überbrücken. Durch diesen 


Adresse 

Inhalt 

Stimme 1 

Stimme 2 

Stimme 3 


54272 

54279 

54286 

Tonfrequenz (Low-Byte) 

54273 

54280 

54287 

Tonfrequenz (High-Byte) 

54274 

54281 

54288 

Tastaturverhältnis Rechteckgenerator 




(Low) 

54275 

54282 

54289 

Tastaturverhältnis Re c hte ckgenerator 




(High) 

54276 

54283 

54290 

Wellenform 

54277 

54284 

54291 

Anschlag/Abschwellen 

54278 

54285 

54292 

Halten/Ausklingen 


54296 


Lautstärke 

Mögliche Wellenformen: Dreieck (17), Sägezahn (33), Rechteck (65), 

Rauschen (129) 




Tabelle 4. Die wichtigsten Register des C 64-Soundchips 


NOTE 

WERT 


NOTE 

WERT 

C 

135 


G 

215 

c# 

143 


A b 

217 

D 

147 


A 

219 

E b 

151 


B 

221 

E 

159 


H 

223 

F 

163 


C 

225 

F# 

167 


C# 

227 

G 

175 


D 

228 

A b 

179 


E b 

229 

A 

183 


E 

231 

B 

187 


F 

232 

H 

191 


F # 

233 

C 

195 


G 

235 

c# 

199 


A b 

236 

D 

201 


A 

237 

E b 

203 


B 

238 

E 

207 


H 

239 

F 

209 


C 

240 

F# 

212 


c# 

241 

Stimmlagen-Befehle 


X = 


Funktion 

POKE 36878.X 


0 bis 15 


setzt die Lautstärke 

POKE 36874.X 


128 bis 255 


spielt Note 

POKE 36875.X 


128 bis 255 


spielt Note 

POKE 36876.X 


128 bis 255 


spielt Note 

POKE 36877.X 


128 bis 255 


Geräuscheffekte 


Tabelle 5. Notenwerte und Tongeneratoradressen beim VC 20 


Adressen 785 und 786 verlegt wur¬ 
de. Bei Programmen, welche die 
USR-Funktion verwenden, müssen 
diese unterschiedlichen Adressen 
unbedingt beachtet werden. 

Wie aus den Bildern 1 und 2 her¬ 
vorgeht, liegt der Basic-Interpreter 
beim C 64 in einem anderen Adreß- 
bereich als beim VC 20. Da die Rou¬ 
tinen aber bis auf Ausnahmen (USR- 
Funktion) völlig gleich sind, kann 
man die Adressen sehr einfach um¬ 
rechnen: VC 20-Adressen zwischen 

54 


Sprungbefehl entsteht im folgenden 
eine Adressendifferenz um drei By¬ 
tes. Von allen C 64-Adressen zwi¬ 
schen $E000 und $E37A müssen da¬ 
her diese drei Bytes abgezogen 
werden, um die entsprechenden 
VC 20-Adressen zu erhalten. 

Einige häufig vorkommende 
POKE-Adressen wurden bisher 

Bild 1. Speicherbelegung des Commodore 64 im 
Grundzustand. Im Bereich SDOOO bis SDFFF sind 
zusätzlich 4 KByte Zeichengenerator-ROM überlagert 


noch nicht erwähnt. Gemeint sind 
die zur Programmierung von Musik 
und Geräuscheffekten benutzten 
Register. Leider ist die Art und Wei¬ 
se der Tonerzeugung bei beiden 
Computern völlig unterschiedlich, 
so daß sich keine äquivalenten 
POKE-Befehle angeben lassen. 

Der C 64 verfügt nämlich über ei¬ 
nen vollwertigen Synthesizer-Bau¬ 
stein, während der VC 20 nur »nor¬ 
male« Tongeneratoren besitzt. Ta¬ 
belle 4 enthält für alle VC 20 Besitzer 
eine Übersicht über die beim C 64 
zur Tonerzeugung benutzten Regi¬ 
ster. Diese Tabelle dient allerdings 


HEX 

FFFF 


DEZIMAL 
-i— 65535 


8 K Betriebs¬ 
system-ROM 


E000 - 
DC00- 
D800 - 
D000 - 

coooo- 


AOOOO- 


1 K 1/ -Bereich 


1 K Farb-RAM 


2 K Systemkontrollen 


4 K RAM für 
Maschinensprache 


8 K Basic-ROM 


57344 

56320 

55296 

53248 


49152 


40960 


38 K RAM 


0800 

0400 

0000 


1 K Video-RAM _ 

I K RAM Zeropage. Stack 


2048 

1024 

0 
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C 64/VC 20 


Software 


wirklich nur zur Orientierung, wel¬ 
che POKE-Befehle beim C 64 zur 
Tonerzeugung dienen. Eine Simula¬ 
tion des C 64-Synthesizers ist mit 
dem VC 20 nicht möglich. Es emp¬ 
fiehlt sich daher, bei der Programm¬ 
anpassung zunächst einmal alle der¬ 
artigen POKE-Befehle fortzulassen 
und später eigene Sound-Routinen 
einzufügen. 

C 64-Besitzer haben es hier etwas 
besser: Mit etwas Geschick und ei¬ 
nem guten Handbuch zur Musikpro¬ 
grammierung können sie dem C 64 
auch alle VC 20-Töne entlocken. Als 
Referenz hierzu kann Tabelle 5 mit 


den Daten zu den Tongeneratoren 
des VC 20 dienen. Im Zweifelsfalle 
sollte man aber auch hier eher auf 
originalgetreue Tonuntermalung 
verzichten und sich damit eine gan¬ 
ze Menge Arbeit sparen. 

Und noch ein Punkt, wo der VC 20 
hardwäremäßig benachteiligt ist: 
Der C 64 verfügt nämlich gleich 
über zwei Joystickports (mit den 
Adressen 56320 und 56321), wäh¬ 
rend der VC 20 sich mit einem An¬ 
schluß zufrieden geben muß, der zu 
allem Überfluß auch noch ein recht 
kompliziertes Abfrageprogramm 
erfordert. Der Feuerknopf und die 


HEX 

FFFF 


E000 


COOO 


Ä000 

9800' 

9600 

9400 

9000 


8000 


2000 

1E00 

1000 

0400 

0000 



8 K Betriebs¬ 
system-ROM 



8 K Basic-ROM 



8 K Steckmodul¬ 
bereich 



frei für 

I/O-Erweiterungen 



0,5 K Farb-RAM 



frei 



1 K Systemkontrollen 



4 K Zeichen- 
generator-ROM 



frei 



0,5 K Video-RAM 



3,5 KRAM 
(Grund Version) 



Erweiterung 
+ 3 KRAM 



1 K RAM Zeropage. Stack 



DEZIMAL 

65535 


57344 


49152 


40960 

38912 

38400 

37888 

36864 


32768 


24576 


16384 


8192 

7680 

4608 

4096 


1024 

0 


8 K Betriebs¬ 
system ROM 


8 K Basic-ROM 


8 K Steckmodul- 
Bereich 


frei für 

I/O-Erweiterungen 


frei 


0,5 K Farb-RAM 


K Systemkontrollen 


4 K Zeichen¬ 
generator-ROM 


8 K Erweiterung 3 

( + 24 K) 


8 K Erweiterung 2 
(+ 16 K) 


8 K Erweiterung 

( + 8K) 


3,5 K RAM 
(Grundversion) 


0,5 K Video-RAM 


frei oder 3 K für 
Maschinensprache 


1 K RAM Zeropage, Stack 


HEX 

■FFFF 


E0000 


■COOO 


A000 

9800 

■9600 

•9400 

■9000 

■8000 


•6000 


4000 


2000 

■1200 

1000 

■ 0400 

■ 0000 


Schalter 0,1 und 2 des Joysticks wer¬ 
den nämlich beim VC 20 über VIA 
#1 gelesen, während der Zustand 
von Schalter 3 über VIA # 2 abge¬ 
fragt wird. Normalerweise sind Joy¬ 
stickabfragen in Programmen leicht 
zu finden. Halten Sie beim VC 20 
nach PEEKs in die Speicherstellen 
37137 und 37152 Ausschau und beim 
C 64 nach entsprechenden Abfra¬ 
gen der Adressen 56320 und 56321. 
Anschließend muß die gesamte Joy¬ 
stickroutine für den jeweiligen 
Rechner neu geschrieben werden, 
da die Art der Abfrage einfach zu 
unterschiedlich ist. 

Bei der Steuerung mittels Dreh¬ 
reglern (sogenannten Paddies) ist 
die Anpassung wesentlich einfa¬ 
cher zu realisieren. Die Paddle- 
Werte werden beim C 64 aus den 
Registern 54297 und 54298 ausgele¬ 
sen. Beim VC 20 sind es die Register 
36872 und 36873. Das Umschreiben 
besteht hier also lediglich im Einset¬ 
zen der entsprechenden Adressen 
in die PEEK-Befehle. 

Wo sich das Umschreiben lohnt 

An dieser Stelle muß noch einmal 
deutlich darauf hingewiesen wer¬ 
den, daß die Zahl derjenigen Pro¬ 
gramme, die mit vertretbarem Auf¬ 
wand vom C 64 zum VC 20 oder um¬ 
gekehrt übertragen werden kön¬ 
nen, doch verhältnismäßig gering 
ist. Bei Spielprogrammen ist in der 
Regel äußerste Vorsicht geboten, da 
hier aus Geschwindigkeitsgründen 
zumeist mit Routinen in Maschinen¬ 
sprache gearbeitet wird. Außerdem 
ist bei Spielen in der Regel das Bild¬ 
schirmlayout fest vorgegeben, so 
daß wegen der unterschiedlichen 
Büdschirmkapazität beider Compu¬ 
ter sehr wahrscheinlich größere 
Probleme auftreten werden. Von 
Sprites und hochauflösender Grafik 
einmal ganz zu schweigen. 

Dagegen gibt es viele Anwen¬ 
dungsprogramme, welche den 
Computer nicht zu einer hochspe¬ 
zialisierten Spielmaschine machen, 
sondern ganz einfach Problemlö¬ 
sungen in Basic anbieten. Dabei 
kann es sich beispielsweise um ein 
Textverarbeitungsprogramm, eine 
Lagerverwaltung oder ganz einfach 
um ein Programm zum Ausdrucken 
eines Jahreskalenders handeln. Für 
fast alle derartigen Programme soll¬ 
te es möglich sein, eine Anpassung 
mit Hilfe der hier abgedruckten Ta¬ 
bellen und Adressenvergleiche vor¬ 
zunehmen. (ev) 

Bild 2. Speicherbelegung des VC 20 bis 3-KByte- 
Erweiterung (links) und ab 8-KByte-Erweiterung 
(rechts) 
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C 64/VC 20 


Relative Datei 


mm IM (R€LWN€li) 


DIR€KTZUGRIFF- 


K ommen wir gleich zu den Vor- 
und Nachteilen. Der Hauptvor¬ 
teil der relativen Datei ist der 
schnelle Zugriff auf Daten. Ein weite¬ 
rer Vorteil ist, daß eigentlich nur we¬ 
nig Speicherplatz des Computers 
notwendig ist, nämlich nur so viel, 
wie das Programm selbst benötigt. 
Deshalb ist eine sinnvolle Anwen¬ 
dung dieser Dateiform auch mit dem 
VC 20 in der Grundversion möglich. 
Allerdings ist ein Diskettenlaufwerk 
unbedingt notwendig. Die sequen¬ 
tielle Datei hingegen benötigt viel 
Speicherplatz im Computer, und ein 
schneller Zugriff auf Daten ist nicht 
einfach zu realisieren, zumindest 
muß die gesamte Datei erst in den 
Speicher des Computers geladen 
werden, bevor man sinnvoll mit ihr 
arbeiten kann. Jedoch ist nicht unbe¬ 
dingt ein Diskettenlaufwerk notwen¬ 
dig, die Datasette tut’s auch, wenn 
auch erheblich langsamer. Der 
Nachteil der relativen Datei ist die 
Art des Zugriffs auf bestimmte Da¬ 
ten. Er ist nämlich nur über die Da¬ 
tensatznummer möglich. Das heißt; 
Angenommen, wir haben uns eine 
Adressendatei aufgebaut und auch 
schon eine Anzahl Adressen einge¬ 
geben. Wenn wir uns jetzt die Adres¬ 
se von Anton Huber ausgeben las¬ 
sen wollen, so ist das nicht möglich, 
indem wir den Namen »Huber« ein¬ 
geben und dann das Ergebnis, sei¬ 
ne Adresse, auf einen Schlag vor uns 
haben. Dazu müßten wir seine Satz¬ 
nummer kennen. Vereinfacht kann 
man sagen, daß die Satznummer an¬ 
gibt, die wievielte Adresse gemeint 
ist. Satznummer 14 bedeutet also die 
14. Adresse. Diese Adresse findet 
der Computer, weil er vom Dateian¬ 
fang ausgeht, den er sich merkt, und 
dann 13 Datensätze überspringt (auf 
den nächsten Datensatz positio¬ 
niert), um direkt den 14. Datensatz zu 
lesen (daher der Name relative Da¬ 
tei: relativ zum Dateianfang). 


ln diesem Bericht werden die Unterschiede zwischen 
der relativen und der sequentiellen Datei aufgezeigt und 
anhand eines Beispielprogramms die Programmierung 
einer relativen Datei erklärt. 


R 
li 
R 

i vn c 
14'..' C 

ü .,£ / 

m 


i .!i 

1 Ü 

30 
4 O 


} i ‘i 

k. i a 

L M 

LULL 
LU BL 


ft- ft 


n X- ft X ft ft ft X X rr ftt ft ft ft -X X * ft ft- -ft * -ft- -ft- -ft 

ADKEGSENÜfi I In I 64 ' ER/ 7 REE * 

ft ft Y: -ft ft ft ft- M -s- ft -ft -ft ft -ft -ft ft ft- ft- -ft -ft -ft -ft ft- ft- ft- ft- -ft -ft 

5:UPEN 15,0,15 


i OPEN 


H ADR,REL,L "+GHR$ 


rvn 




1 020 

r~: J— Krf 

HC ! 

1030 

X 

1040 

PR I NT 

1050 

PRINT 

1 Uoü 

PR I NT 

1070 

PR I NT 

1080 

PR 1N ! 

1090 

PRINT 

1 100 

PRINT 

1 110 

PRINl 

11.20 

PRINT 

1 i pv] 

0ET r 

i 140 

I F~ Rf 

1 150 

IF RT 

1 160 

IF ET 

1 170 

IF ET 


AUSWAHL 


RELATIVE DATEI 
SPRINT SPRINT 
" 1 =. DATEI EINRICHTEN" 

!i 2 = DATEN EINGEBEN 11 
11 3 = SUCHEN UND ANZEIGEN" 

*' X - PROGRAHNENDE 11 

SPRINT 

"14 AE Hl E !! 

Ts 1 F*“rS^ m 


7” 


"1" TUEN 
"2" TUEN 

<i jhen 
THEN 


V 3. 


THEN 
eosuB 
GÜSUö 
GOSUB 
CA HSF 


1 1 ooo 

4000 

3000 

IsCLOSE 15s END 


1 180 
2000 
2010 
2020 
2030 


GOTO 1OOO 
REH - 


ihn 

kem 


BILÖSCHIRHAN 2 EIGE 


RN s PRINT 


2040 

2050 

PRINT " 
PRINT 

Li ANZEI 

2060 

PRINT " 

NUMMER "; 

2070 

PRINT 


2080 

PRINT " 

NAME ; 

2090 

PRINT " 

STRASSE s 

2 i 6o 

PRINT " 

PLZ/ORT s 

2 i i o 

PRINT " 

TELEFON s 

2120 
2130 
2140 

PRINT : 
RETURN 

PRINT sPRI 


"NOT" 
" SET 
" PET " 
"TE$ 


NNT 

GTT 


Mit diesem Programm können Sie bis zu 1978 Datensätze (Adressen) verwalten. Das gilt für C 64 
und für den VC 20! 



ü-U'r-onllno.do 

Ausgabe 7/Juli 1984 















C 64/VC 20 


Relative Datei 


3000 

3010 

3020 

3030 

3040 

E 

3050 
3060 
3070 
3080 
'3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
4000 
4010 
4020 
4030 
4040 
4050 
4060 
40/0 
4060 
4090 
5000 
5010 
5020 
3030 
5040 
5050 
5ü60 
5070 
5080 
5090 
5100 
6000 
601 0 
6020 
6030 
6040 
6050 
«6000 
60 / O 
6080 


REM - 

REM - SUCHEN 
REH - 


BÜSUB 13000sREM DATENSATZNR.EINGAB 

GOSUB 9000 s REM LESEN 

IF RCT <> CHR$(255) THEN 3120 

PRINT "ü" 

PRINT 5 PRINT SPRINT 

PRINT 51 NGCHT NICHT BESCHRIEBEN" 

PRINT SPRINT 

GOTO 3140 

GOSUB 50005 REM AUFTEILEN 
GOSUB 20005 REM ANZE1GEN 
PRINT ” DRUECKE TASTE" 

BEI RT s I F RT= ,! i! THEN 3150 
R$=" " 

RETÜRN 


REM - 

REM - 
REM .-. 


EINGABE 


BÜSUB 130005 REM DAT ENSATZNR. 
GOSUB 60005 REM EINGABE 
GOSUB 70005 REM VERKETTEN 
GOSUB 8000:REM SPEICHERN 
RETURN 


REM 

REM 

REM 


AU/TEILEN DATENSATZ IN FELDER 
-.... s*eR-onuna - 


NVT-LEF I T <RÜT . 15) 

IMNT-M 1UT<RCT, 16.15) 

SR$=MIDT (RCT .31 , 20) 

PLT~M 1 DT (RCT15 i ; 4 5 
Ü i T=M 1 DT (RCT ;55 
\ ET=MI DT (RCT ; 70.12) 
RETURN 

REM ...--- 

REM E i IMGABE NEUE DAT EN 

REM -.-.-.--- 


PRINT "LT 
PRINI " 
j 1 t 'l I 

PK IN S 
PR1N! 


EINBABE NEUE DATEN" 

-• I R r s -i s 

" NUMMER "5 KN 

5 PRINi 


6090 

INPU'f 

"NACHNAME 

" 5 NNTs nnt-leftt 

(um 

. 15) 

6100 

1NFU r 

"VORNAME 

" ; NVT: NVT=LEF TT 

(NVT 

, 15) 

6 i 1 0 

INPU ! 

"BfRASSE 

"sSRT:SRT==LEFTT 

(SRT 

„ 20 ) 

6120 

INPUT 

"POSTLZ. 

" 5 PLT: FLT-LEFTT 

(FLT 

,4) 

6 130 

INPUT 

"ORT 

"§ OTT;GTT=LEFTT 

(OTT 

- 15) 

6140 

I NPU f 

"TELEFON 

TE$: TET-LEFTT 

(TET 

. 12 ) 

6 150 
6160 

PRINT 
PR IN! 

SPRINT 
" ADRESSE 

OK (J / N) ?" 


6 170 

GET RT 

5IF RT="" 

THEN 6170 



6180 IF RT="N ,! THEN 6040 
6190 IF THEN 6170 

8200 RETURN 


Programmierung 
relativen Datei 
(Fortsetzung) 


Dazu ist eine Voraussetzung not¬ 
wendig: Die Datensätze müssen alle 
die gleiche Länge haben. Wie das 
realisiert wird, erkläre ich noch. 

Um einer möglichen Frustration 
vorzubeugen, sei gesagt, daß auch 
eine direkte Suche über einen Na¬ 
men möglich ist, indem man die Vor¬ 
teile der relativen Datei mit der der 
sequentiellen Datei verknüpft. 

Eine relative Datei besteht im Prin¬ 
zip aus 3 Teilen: 

1. Einrichten einer Datei 

2. Speichern (Schreiben) eines 
Datensatzes 

3. Lesen eines Datensatzes 

Gehen wir diese Teile Schritt für 

Schritt durch. Anhand des Listings 
können Sie diese Schritte mitverfol¬ 
gen. 

1. Einrichten einer relativen Datei 

Um mit einer relativen Datei arbei¬ 
ten zu können, müssen 2 Kanäle zur 
Floppy geöffnet werden. Zum ersten 
ist das der Kommandokanal (Kanal 
15) und zweitens ein beliebiger an¬ 
derer Kanal. Der Kommandokanal 
ist notwendig um den Positionierbe¬ 
fehl zu übertragen. Mit dem ande¬ 
ren Kanal wird die Datei eröffnet 
und bearbeitet. 

1.a) Öffnen des Kommandokanals 
130 CLOSE 15:0PEN 15,8,15 

Sicherheitshalber sollte man vor 
jedem OPEN ein CLOSE setzen, um 
eine eventuelle Fehlermeldung »FI¬ 
LE OPEN ERROR» zu verhindern. 

I.b) Eröffnen der Datei und Festsetzen der Da¬ 
tensatzlänge 

Wie schon erwähnt, ist ein Merk¬ 
mal der relativen Datei, daß jeder 
Datensatz die gleiche Länge besit¬ 
zen muß. Diese Angabe muß beim 
Einrichten der Datei angegeben 
werden. Das geschieht mit folgen¬ 
dem Befehl: 

OPEN lfn,ga,kanal,”dateiname,L” + CHR$(da- 
tensatzlänge) 

(im Listing Zeile 140 und 11120) 
lfn = logische filenummer 
ga = Geräteadresse (normalerwei¬ 
se 8) 

kanal (2-14) 

dateiname = Name der Da¬ 
tei,wird so im Directory abgelegt, im 
Beispiel »ADR.REL«. 

L = Kennzeichen für eine relative 
Datei 

datensatzlänge = Summe aller Feld¬ 
längen (1-254) 

Der Buchstabe »L« sagt dem DOS, 
daß eine relative Datei eröffnet 
wird. Diesem Buchstaben muß die 
Angabe der Datensatzlänge folgen. 
Sie wird mit dem CHR$ gesandt, Im 
Beispiel setzt sich ein Datensatz fol¬ 
gendermaßen zusammen: 
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C 64/VC 20 


15 Buchstaben 
15 Buchstaben 
20 Buchstaben 
4 Buchstaben 
15 Buchstaben 
12 Buchstaben 


NAME 
VORNAME 
STRASSE 
POSTLZ 
ORT 

TELEFON 
Das ergibt insgesamt 81 Buchsta¬ 
ben pro Datensatz. Da jeder Daten¬ 
satz (auch RECORD genannt) mit ei¬ 
nem RETURN abgeschlossen wird, 
erhöht sich die Datensatzlänge auf 
insgesamt 82 Zeichen. 


I.c) Positionieren 

Der Computer findet einen be¬ 
stimmten Datensatz über die Daten¬ 
satznummer, indem er sich den Da¬ 
teianfang merkt und die entspre¬ 
chende Anzahl Datensätze über¬ 
springt. Genauer gesagt, er positio¬ 
niert auf diesen Datensatz. Und das 
wird mit dem Positionierbefehl erle¬ 
digt. Dieses Kommando wird über 
den Kommandokanal (15) der Dis¬ 
kette gesandt. Seine Form ist: 

PRINT #lfn,”P”+CHR$(kanal+ 
CHR$(low)+CHR$(high)+CHR$(byte) 

(siehe dazu Zeile 11130 - 11190) 

Die Parameter »low« und »high« ge¬ 
ben die Datensatz( = Record)num- 
mer an. Da ein Byte maximal den 
Wert 255 annehmen kann, die Re¬ 
cordnummer aber höher sein darf, 
muß sie aufgeteilt werden in ein 
Low-Byte und ein High-Byte. Das ge¬ 
schieht einfach mit den Anweisun¬ 
gen 

HB=INT(RN/256) 

LB=RN-HB*256 

RN = Recordnummer 
HB = Höherwertiges Byte 
LB = Niederwertiges Byte 

Der letzte Parameter (Byte) posi¬ 
tioniert auf eine bestimmte Stelle in¬ 
nerhalb eines Records. Beispiel: 
PRINT# 15,"P" -i CHR$(2)t CHR$(12) 

+ CHR$(1) + CHR$(8) 

Hier wird auf das 8. Byte des 268. 
Records positioniert. Die 268 ist die 
Recordnummer und wird aufgeteilt 
in ein Low-Byte(12) und ein High- 
Byte(l). (HighByte*256 + Low-By- 
te = Recordnummer). Beim Schrei¬ 
ben eines Records muß jedoch im¬ 
mer auf das erste Byte positioniert 
werden. 

Zum Schluß wird die Datei frei¬ 
gegeben. 

I.d) Freigeben der Datei 
PRINT# 15, CHR$(255) 

Diese Anweisung bewirkt, daß 
alle Records, die unter der ange¬ 
gebenen Recordnummer liegen, 
mit CHR$(255) beschrieben wer¬ 
den, sofern sie noch nicht anders 
belegt wurden. Das dauert seine 
Zeit. Je mehr Datensätze eingerich- 


6210 : 

7010 REM VERKETTEN DER FELDER 

7020 REM —.-.—-- 

7030 : 

7040 BL$=" 

7050 RC*=NV*+LEFT*<BL*,15—LEN(NV*)) 

7060 RC *=R C *+NN $+L EF T * (BL*, 15--LEN CNN*) ) 

70 70 RC*=RC*+SFi*+LEF T * C BL* - 20.LEN <SR*) ) 

7080 RC * -R C *+PL * 4- L EF T * (BL* 14-LEN (PL*) ) 
7090 RC*—RC*-HT1 * f LEF 1 * (ÖL*„ 15—LEN COT* 5 ) 

7100 RC*=RC *+7 E*+LEFI *C BL*112-LEN(TE*) ) 
7110 RETURN 
7120 2 

8000 REM ----- 

8010 REM SPEICHERN DATEN AUF DISK - 

3020 REM ------- 

8030 s 

8040 PR INT# 15, " F*" § CHR* (2} t CHR* (LB) +CHR* 
(HE)+CHR*(1) 

3050 PRINT# 1 * RC* Programmierung einer relativen 

8060 RETURN Datei (Fortsetzung) 

OtJ 7 ü z 

9000 REM --- 


REM 

PPM 


9010 

9020 _ 

9030 F=0 
9040 PRINT# 
(HB)+C 
9050 I 
9060 I 
PRESENT 
9070 FR 
9080 P«=> 

SIE” 


LESEN DATENSATZ VON DISK - 


15,"P"? CHR*(2) t CHR*(LB)+CHR* 

HR*<1) 

MPUT# 15,ER:REM FEHLERKANAL 
- ERC >50 THEN 91.10: REM RECORD NOT 
ERROR 

DATENSATZ NUMMER ZU HOCH" 

' SPRINT " DRUECKEN SIE EINE TA 


9090 GET R*:IF R*="" THEN 9090 
9100 RUN 

9110 INPUT# 1,RC* 

9120 IF ASC<RÖ*} 0255 THEN 9140 
9130 REM DATENSATZ IST NOCH FREI 
9140 RETURN 

11000 REM --- 

11010 REM - NEUE DATEI ANLEGEN 

11020 REM --- 

11030 PRINT !! L» ACHTUNG, EINE BESTEHENDE 
DATEI MIT" 


I1040 PRINT sPRINT " DEM NAMEN ADR »RE 
L ' WIRD GELOEBCHT ,! 

11050 PRINT 

i 1060 PRINT 11 (W) EITER (Z)URUECK" 

11070 BEI Ft*: IF R*= HU THEN 11070 
11080 IF R*C>"W" THEN RETURN 
11090 PRINT 


11100 PRINT 
11110 CLÜSE 
11120 CLOSE 
R*(82) 

11130 PRINT 
IE DATEI " 
11140 FRINT 


: PR INT "BITTE WARTEN" 

15:OPEN 15,8.15.“S:ADR.REL" 

1=OPEN 1,8,2,"ADR.REL,L,"+CH 

"WIEVIELE DATENSAETZE SOLL D 


1 150 
1 160 
1 1 70 
1 180 


"VERWAL1 EN 
IMPUT RN 
HB—INT(RN/256) 
LB=RN-HB*256 


WARTEN" 


i 1190 PRINT# 15 . "P“4-CHR* (2) +CHR* (LB) +CHR 
*(HB)+CHR*(1) 

11200 1NPUT# 15,ER:REM FEHLERKANAL 
11210 IF ERC.>52 THEN 11250:REM DATEI ZU 


GROSS 


60 üjfca» 


Miir-onlim 
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11220 PRINT " DATEI ZU GROSS" 

11230 PRINT :PRINT " DRUECKEN SIE EINE 1 
ASTE'* 

11240 GET R-TsIF R*="" THEN 11270 
11250 PRINT# 1,CHRT <255) 

11260 CLÜSE 1: CA OSE 15 
11270 RUN 

13000 REH -- 

13010 REH - EINGABE DATENSATZNUMMER 

13020 REM - 

13030 : 

13040 PRINT "U" 

13050 FRINT :PRINT sPRINT 

13060 PRINT " EINGABE DER DATENSATZNUMM 
ER" 

13070 INPUT RN 
13080 HB=INT(RN/256) 

13090 LB=RN—HB*256 
13100 RETURN 

READY . Listing zur relativen Datei (Schluß) 


tet (freigegeben) werden, desto 
mehr Zeit beansprucht diese Ar¬ 
beit. Aber erst diese Prozedur er¬ 
laubt ein fehlerfreies Lesen und 
schnelles Schreiben von Datensät¬ 
zen. Wollen Sie einen Record be¬ 
schreiben, der oberhalb des zuletzt 
freigegebenen Records liegt, so 
werden automatisch alle Records, 
die zwischen dem letzten und dem 
gerade beschriebenen Record lie¬ 
gen, freigegeben, das heißt, mit 
CHR$(255) beschrieben. Um diese 
Prozedur zu vermeiden, sollten Sie 
nur das erste Mal, beim Einrichten 
der Datei, die maximal zu erwar¬ 
tende Anzahl Records freigeben. 
Die Fehlermeldung »RECORD 
NOT PRESENT«, die dann im 
Floppy-Fehlerkanal erscheint, 
kann ignoriert werden, da dieser 
Record nur beschrieben (freigege¬ 
ben) wird. 

2. Speichern (Schreiben) eines Datensatzes 

Zum Speichern eines Datensatzes 
sind folgende Funktionen durchzu¬ 
führen: 

2.a) Eingabe der Recordnummer und Auf¬ 
teilung in Low- und High-Byte (siehe 
oben). 

2.b) Eingabe der Daten (zum Beispiel 
über Input). Hier wird auch sicher¬ 
gestellt, daß die einzelnen Felder 
nicht länger werden, als vorher ge¬ 
plant wurde. 

2.c) maximale Datensatzlänge bilden. 

Das wird im Beispiel (siehe Li¬ 
sting) in Zeile 7000 bis 7999 durchge¬ 
führt. Es wird ein String mit der ma¬ 
ximalen Länge (im Beispiel 81) gebil¬ 
det. Dazu wird vorher eine Variable 
(im Listing BL$) definiert, mit der An¬ 


zahl Leerstellen, die das längste 
Feld unseres Datensatzes besitzt (im 
Beispiel das Feld »STRASSE« mit 20 
Zeichen, also enthält B.L$ 20 Leer¬ 
stellen). Jedes Feld unseres Daten¬ 
satzes wird entsprechend seiner 
vorher festgelegten Länge ugd ab¬ 
hängig von der wirklichen'Länge 
bei der Eingabe mit den notwendi¬ 
gen Leerstellen aufgefüllt. Im Bei¬ 
spiel hat die Variable RC$ dann die 
Länge von 81 Zeichen und sie enthält 
den vollständigen Datensatz. 

2. d) Speichern 

Das Speichern dieses Datensat¬ 
zes ist dann schnell geschehen: Es 
wird auf die vorher (in 2.a) angege¬ 
bene Recordnummer positioniert 
und danach mit PRINT #1,RC$ ge¬ 
speichen. 

Mit PRINT # kann man jedoch nur 
Datensätze abspeichern, die nicht 
länger als 88 Zeichen sind. Sonst 
muß man die Daten Zeichen für Zei¬ 
chen mittels einer GET# -Schleife 
schreiben und lesen. 

3. Lesen eines Datensatzes 

Hier erfolgt die Reihenfolge fast 
umgekehrt wie beim Schreiben. Zu¬ 
erst muß jedoch auch hier die Num¬ 
mer des gesuchten Datensatzes ein¬ 
gegeben werden. Nach entspre¬ 
chender Aufteilung in Low- und 
High-Byte wird auf den Record posi¬ 
tioniert und anschließend mit 
INPUT #1, RC$ von der Disk gele¬ 
sen, 

3. a) Eingabe Recordnummer und Auftei¬ 
lung in Low- und High-Byte. 

3.b) Lesen des Datensatzes 


3.c) Aufteilen des Datensatzes 

Dieser Vorgang muß umgekehrt 
dem Verketten (2.c) geschehen. Es 
wird ja lediglich der komplette Da¬ 
tensatz in die Variable RC$ gele¬ 
sen. In Zeile 5000 bis 5999 werden 
wieder die einzelnen Felder gebil¬ 
det. Danach fehlt nur noch die 

3.d) Anzeige des Datensatzes 

Das wars auch schon. Wenn Sie 
sich einmal alles gut durch den 
Kopf gehen lassen und die Proble¬ 
matik am Beispiel durchgehen und 
ausprobieren, können Sie in Zu¬ 
kunft Ihre eigene relative Datei 
programmieren. 

Es ist gar nicht so schwierig, wie 
es auf den ersten Blick aussehen 
mag. Sie können auch Teile dieses 
Programms in Ihre eigenen einbau¬ 
en. Schließlich ist das der Vorteil ei¬ 
nes strukturierten Programmab¬ 
laufs. 

Zum Schluß möchte ich Sie noch 
auf einige Besonderheiten im Li¬ 
sting hin weisen. 

Zeile 11110: Löschen einer even¬ 
tuell bestehenden relativen Datei. 

Zeile 11200-11220: Lesen des 
Fehlerkanals. Wenn der Fehler 52 
gemeldet wird, bedeutet dies, daß 
die Anzahl Datensätze, die Sie an¬ 
gegeben haben, die Speicherkapa¬ 
zität der Diskette sprengen würde. 
Der Fehler 50 (RECORD NOT PRE¬ 
SENT, siehe auch Zeile 9050) be¬ 
deutet, daß Sie einen Datensatz 
lesen wollen, der nicht freigege¬ 
ben wurde. Beim Schreiben 
braucht diese Fehlermeldung nicht 
beachtet werden (siehe l.d). 

Zeile 3060: Wenn ein gelesener 
Datensatz den Wert CHR$(255) be¬ 
sitzt, wird davon ausgegangen, daß 

er noch nicht beschrieben wurde. 
Deshalb wäre es auch sinnlos, Ihn 
anzeigen zu wollen. Dieser Ver¬ 
gleich wird in Zeile 9120-9130 noch- 
einmal in anderer Form 
durchgeführt, kann dort jedoch 
weggelassen werden. 

Zeile 1170: Wenn das Programm 
beendet werden soll, muß der zur 
Positionierung notwendige Kanal 
15 wieder geschlossen werden. 

Anzumerken ist noch, daß nicht 
mehr als eine relative Datei gleich¬ 
zeitig geöffnet werden kann. Es ist 
lediglich möglich, noch eine zusätz¬ 
liche sequentielle Datei zur glei¬ 
chen Zeit zu nutzen. Und diese 
Möglichkeit erlaubt uns, auch kom¬ 
fortablere Suchkriterien als über 
die Recordnümmer einzusetzen. 
Doch darüber mehr in der über¬ 
nächsten Ausgabe des 64'er Maga¬ 
zins. (gk) 
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0,8 hs ist völlig ausreichend, wenn 

k man mit Schreibmaschine und 
im Karteikasten umgehen kann und 
außerdem weiß, wozu ein Papier¬ 
korb gut ist. Denn eben diese Ge¬ 
genstände werden auf dem 
Bildschirm mittels Farbgrafik in na¬ 
türlicher Weise um einen Schreib¬ 
tisch gruppiert dargestellt und 
können mit einem Joystick in einfa¬ 
cher Weise angewählt und aktiviert 
werden. 

Um mit Magic Desk, das als Steck¬ 
modul geliefert wird, arbeiten zu 
können, benötigt man neben einem 
Commodore 64 (oder Executive 64) 
in jedem Falle ein Floppy-Laufwerk 
sowie Joystick und Drucker. Modul 
einstecken, Joystick an Control Port 2 
anschließen und eine leere Diskette 
ins Laufwerk einlegen — und schon 
kann's losgehen. Der Bildschirm 
zeigt zunächst ziemlich formatfül¬ 
lend einen Schreibtisch, daneben 
aufeinandergetürmt drei große Kar¬ 
teikästen (Bild 1). Auf der Schreib¬ 
tischplatte befinden sich ein 
Telefon, ein Taschenrechner, eine 
Schreibmaschine, ein Finanzjournal 
und ein Satz Karteikarten. Ein Pa- 










pierkorb und eine Digitaluhr sind 
ebenso vorhanden. Von diesen Ge¬ 
genständen kann man mit Magic 
Desk I jedoch nur Schreibmaschine, 
Papierkorb, Digitaluhr sowie die 
drei Karteikästen benutzen. Die an¬ 
deren Utensilien sind für spätere 
Maaic Desk — Versionen vor¬ 
gesehen. 

Ebenfalls auf dem Bildschirm er¬ 
scheint eine Hand mit ausgestreck¬ 
tem Zeigefinger. Diese Hand kann 
mit dem Joystick beliebig über den 
Bildschirm bewegt werden. Um eine 
Funktion zu aktivieren, positioniert 
man die Hand so, daß der ausge¬ 
streckte Zeigefinger auf das ent¬ 
sprechende Gerät deutet und 
drückt den Feuerknopf am Joystick. 
Das ausgewählte Gerät erscheint 
daraufhin weiß eingerahmt und das 
Schirmbild wechselt in den meisten 
Fällen. Nun kann man weitere Unter¬ 
funktionen aufrufen, indem man den 
Handzeiger auf andere grafisch 
dargestellte Gegenstände deuten 
läßt oder die Tastatur benutzt. Das 
Arbeiten gestaltet sich so sehr kom¬ 
fortabel und übersichtlich, ohne daß 
man sich darum zu kümmern hat, 
welche Schritte der Computer ma- 




m " crten - 

können 




chen muß, um eine Aufgabe zu er¬ 
ledigen. 

Briefeschreiben 

leichtgemacht 

Nehmen wir zum Beispiel das 
Briefeschreiben mit anschließen¬ 
der Archivierung einer Kopie. Mit 
Maaic Desk geht das mindestens 
genauso problemlos wie an einem 
realen Schreibtisch. Mittels Joystick 
läßt man den Handzeiger auf die auf 
dem Bildschirm abgebildete 
Schreibmaschine fahren und drückt 
den Feuerknopf. Sofort wechselt das 
Schirmbild und zeigt im unteren 
Drittel die grafischen Darstellungen 
von fünf Objekten: Schreibtisch, Ta¬ 
bulatoren (der Schreibmaschine), 
die Schreibmaschine selbst, 
Drucker und Papierkorb. 

Die Schreibmaschine ist weiß um¬ 
rahmt und der bekannte Handzei¬ 
ger deutet darauf. Solange der 
weiße Rahmen um die Schreibma¬ 
schine existiert, läßt sich der Hand¬ 
zeiger nicht bewegen. Dafür kann 
man nun die Schreibmaschine be¬ 
nutzen, deren Wagen ungefähr in 
der Bildschirmmitte sehr realistisch 
dargestellt ist (Bild 2). Die Computer¬ 
tastatur wird nun als normale 


Schreibmaschinentastatur mit Groß- 
und Kleinschreibung benutzt. Die Si¬ 
mulation einer Schreibmaschine ist 
nahezu perfekt. Der Wagen rückt 
mit jedem Anschlag eine Stelle nach 
links, wobei maximal 80 Zeichen in 
einer Zeile möglich sind, von denen 
aber immer nur 40 Zeichen im Bild 
sind (horizontales Scrolling). 

Einige Stellen vor Erreichen des 
Zeilenendes ertönt eine Warnklin¬ 
gel, bei Betätigen der RETURN- 
Taste wird ein Wagenrücklauf mit¬ 
tels Grafik und entsprechendem 
Geräusch simuliert. Mit den Funk¬ 
tionstasten F5 und F7 können Tabu¬ 
latoren gesetzt oder gelöscht 
werden, mit F3 erfolgt ein schneller 
Wagenvorlauf auf die nächste Tabu¬ 
latorposition. Mittels Joystick oder 
Cursortasten kann man sich auf dem 
dargestellten Papierbogen in alle 
vier Richtungen bewegen und mit 
der DEL-Taste beliebige Textberei¬ 
che löschen. 

Vorsicht ist geboten beim Umgang 
mit der DEL- und der SPACE-Taste. 
DEL löscht das Zeichen, auf das die 
Maschine gerade positioniert ist und 
hinterläßt einen Freiraum, zieht den 
Text also anders als beim normalen 
Basic-Betrieb nicht zusammen. Die 
SPACE-Taste wirkt dagegen genau¬ 
so wie ein »Cursor rechts», verändert 
also keine Zeichen. Das ist beim 
Überschreiben von Textstellen des 
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öfteren sehr störend, da uner¬ 
wünschte Zeichen explizit mit DEL 
gelöscht werden müssen. 

Bis auf das Überschreiben von 
Texten und das Löschen von Zei¬ 
chen gibt es keine weiteren Editier¬ 
möglichkeiten, insbesondere ist es 
unmöglich, zusätzlichen Text einzu¬ 
fügen oder Textstellen zu kürzen. 
Diese fehlenden Editiermöglichkei¬ 
ten sind sicherlich ein Schwach¬ 
punkt des Programms, auch wenn 
man berücksichtigt, daß Magic 
Desk kein hochspezialisierter Text¬ 
editor ist und auch keiner sein soll. 

Druckerausgabe auf 
Knopfdruck 

Doch nun weiter in unserem Bei¬ 
spiel ! Hat man den Text fertig ge¬ 
schrieben oder ist man am Ende 
einer Seite angelangt (jede Seite hat 
66 Zeilen), dann kann man den Text 
auf dem Drucker ausgeben 
und/oder in einem der drei Kartei¬ 
kästen archivieren. Das Aus¬ 
drucken einer Seite gestaltet sich 
dabei denkbar einfach: Man drückt 
den Feuerknopf am Joystick, worauf 
die weiße Umrandung um das 
Schreibmaschinensymbol ver¬ 
schwindet. Nun lenkt man den 
Handzeiger etwas nach rechts, so 
daß er auf die kleine Abbildung ei¬ 
nes Druckers zeigt. Nun nochmals 
den Feuerknopf betätigen und 
schon bekommt das Druckersymbol 
einen weißen Rahmen und der 
Drucker rattert los und druckt den — 
symbolisch gesprochen — in die 
Schreibmaschine eingespannten 
Bogen aus. 

Eine Kopie gefällig? Einmal Feu¬ 
erknopf drücken — Drucker aus, 
wieder Feuerknopf drücken — die 
Textseite wird nochmals ausge¬ 
druckt. Das läßt sich beliebig fort¬ 
setzen, denn die Textseite in der 
Schreibmaschine bleibt solange er¬ 
halten, bis man sie entweder in einer 
Kartei ablegt oder sie in den Papier¬ 
korb wirft. 

Letzteres ist genauso einfach wie 
das Ausdrucken. Mit dem Joystick 
den Handzeiger auf das Papierkorb¬ 
symbol setzen, Feuerknopf betäti¬ 
gen und die Textseite erscheint 
verkleinert über dem Papierkorb. 
Falls man es sich anders überlegt 
hat, kann man jetzt einfach ein ande¬ 
res Objektsymbol ansteuern, die 
Textseite landet dann wieder in der 
Schreibmaschine. Drückt man aller¬ 
dings ein zweites Mal den Feuer¬ 
knopf, dann wandert die Textseite — 
mit einer an .»Space Invader« erin¬ 


nernden Geräuschuntermalung — 
in den Papierkorb und ist damit end¬ 
gültig verloren. 

Die Floppy ersetzt 
den Karteikasten 

Alle mit der Schreibmaschine er¬ 
zeugten Textblätter können jedoch 
auch in einer Kartei archiviert wer¬ 
den. Die Kartei wird vom Hauptme¬ 
nü — also von der Bildschirmdar¬ 
stellung des gesamten Schreib¬ 
tisches her — angewählt. Zur Verfü¬ 
gung stehen drei Karteikästen. Je¬ 
der dieser Karteikästen enthält zehn 
gelbe Indexkarten, deren oberer 
Rand beliebig beschriftet werden 
kann und die mit dem Joystick in na¬ 
türlicher Weise durchgeblättert 
werden können (Bild 3). Zu jeder gel¬ 
ben Indexkarte wiederum gehören 
zehn weiße Textkarten, die ebenso 
wie die gelben Indexkarten be¬ 
schriftet und durchgeblättert 
werden. 

Das Ablegen einer mit der 
Schreibmaschine erstellten Textsei¬ 
te geschieht nun sehr einfach und 
genauso wie in einer realen (Papier-) 
Kartei. Zunächst wird einer der drei 
Karteikästen angewählt. Auf dem 
Bildschirm erscheinen nun die zehn 
gelben Indexkarten, die man bis zur 
gewünschten Karte durchblättert 
und eventuell mit einem Stichwort 
beschriftet. Mit dem Joystick wer¬ 
den die zur Indexkarte gehörigen 
weißen Textkarten auf den Bild¬ 
schirm gebracht und bis zur ge¬ 
wünschten Stelle durchgeblättert. 
Nun den Feuerknopf drücken und 
die kleine Abbildung einer Diskette 
anwählen — und schon wird der 
Text aus der Schreibmaschine an 
der ausgewählten Stelle in der Kar¬ 
tei abgelegt. 

Um sich einen Textbogen aus der 
Kartei anzusehen, geht man wie zu¬ 
vor beschrieben zur gewünschten 
Stelle in der Kartei, wählt aber dann 
statt des Diskettensymbols einen 
kleinen weißen Zettel an. Das ent¬ 
sprechende Karteiblatt wird da¬ 
durch in großformatiger Darstellung 
auf den Schirm gebracht und kann 
eingesehen oder auch in die 
Schreibmaschine eingespannt 
werden. 

Da sowohl die gelben Indexkarten 
als auch die weißen Karteikarten be¬ 
liebig beschriftet werden können, 
bietet sich das System für Adressen- 
listen, Inhaltsverzeichnisse, Termin¬ 
planungen oder ähnliche Anwen¬ 
dungen geradezu an. 

Eine Diskette kann den Inhalt drei¬ 


er Karteikästen speichern; das sind 
immerhin 300 Textbögen, die aller¬ 
dings nicht alle vollständig beschrie¬ 
ben sein dürfen. Durch Verwen¬ 
dung mehrerer Disketten kann das 
Speichervermögen der Kartei prak¬ 
tisch beliebig gesteigert werden. 

Bei der praktischen Arbeit mit Ma¬ 
gic Desk machten sich die doch 
recht langen Disketten-Zugriffszei- 
ten unangenehm bemerkbar: 

Zwischen fünf und zehn Sekunden 
zum Anwählen eines Karteikastens 
(nur der reine Diskettenzugriff!) ist 
noch akzeptabel, aber eine runde 
Minute zum Abspeichern eines 
Fünf-Zeilen-Textes zerrt mitunter 
schon sehr an den Nerven des Be¬ 
nutzers. Allerdings sind diese lan¬ 
gen Zugriffszeiten in erster Linie 
wohl auf den seriellen Datentrans¬ 
port zwischen dem C 64 und dem 
verwendetem 1541-Laufwerk zu¬ 
rückzuführen. 


Magic Desk gibt 
Hilfestellung 

Ein Glanzpunkt des Magic Desk 
wurde bisher noch nicht erwähnt: 
Wenn man sich über die Funktion ei¬ 
nes Gegenstandes im unklaren ist 
oder sich sonstwie nicht zu helfen 
weiß, genügt ein Druck auf die 
»Commodore«-Taste des C 64 um ein 
Hilfsmenü aufzurufen. Je nach ange¬ 
wählter Funktion erscheint dabei ein 
anderes Hilfsmenü, das eine Anzahl 
von Gegenständen auf den Schirm 
zeichnet, mit denen es der Benutzer 
gerade zu tun haben könnte (Bild 4). 

In der schon bekannten Art und 
Weise kann man nun eine dieser Ab¬ 
bildungen mit dem Joystick ansteu¬ 
ern und erhält dann nähere 
Informationen über den Umgang mit 
dem entsprechenden Gegenstand. 
Durch Ansteuerung eines Schildes 
mit der Aufschrift »EXIT« gelangt 
man wieder zur gerade aktuellen 
Funktion zurück. 

Insgesamt betrachtet ist das Ar¬ 
beiten mit dem Magic Desk recht er¬ 
freulich, alle Funktionen lassen sich 
per Joystick leicht und sicher ausfüh¬ 
ren. Die Einarbeitungszeit ist we¬ 
sentlich kürzer als bei entsprechen¬ 
den konventionellen Programmen. 

Wer von Magic Desk allerdings ei¬ 
nen ausgefeilten Texteditor oder ein 
komfortables Datenbanksystem er¬ 
wartet, der wird einigermaßen ent¬ 
täuscht sein. Magic Desk ist weder 
das eine noch das andere und soll es 
auch gar nicht sein. Es ist halt nur ein 
Schreibtisch — allderdings einer mit 
recht magischen Zügen. (ev) 
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A ngenommen Sie möchten mit 
Ihrem C 64 ein komplettes Da¬ 
tenverwaltungssystem einrich¬ 
ten. Wie gehen Sie vor? Program¬ 
mieren Sie selbst, vielleicht in Ba¬ 
sic? Oder kaufen Sie sich ein 
fertiges Programm? Beide Möglich¬ 
keiten haben ihre Vor- und Nach¬ 
teile. Es gibt aber noch eine dritte 
Möglichkeit. Sie benutzen einen 
Programmgenerator. 

Ein Programmgenerator ist ein 
Programm, das nach Ihren Anga¬ 
ben ein Programm erstellt. Dabei 
müssen Sie selbst kaum program¬ 
mieren können. Sie geben nur ein 
sehr allgemeines Ablaufschema 
des zu erstellenden Programmes 
ein. Das von Ihnen eingegebene 
Schema wird nun Schritt für Schritt 
verfeinert. Nach Ablauf der Gene¬ 
rierung steht das erzeugte Pro¬ 
gramm unabhängig von dem 
Programmgenerator zu Ihrer Ver¬ 
fügung. 

Das gut lesbare Handbuch hat 
das Format eines Taschenbuches. 
Die Einarbeitungszeit ist recht kurz, 
und für einfache Problemlösungen 
benötigen Sie nicht einmal Basic 
Kenntnisse. 

Dieser Programmgenerator ist 
menüorientiert, was bedeutet, daß 
mit baumartig organisierten Bild¬ 
schirmmasken alle Möglichkeiten 
zur Auswahl angeboten werden 
und Sie Ihre Auswahl nur in Form 
einer Zahl eingeben brauchen. 
Diese Dialogform ist recht fehlersi¬ 
cher und hat den Vorteil, daß Sie 
nach wenigen Stunden kaum noch 
in das Handbuch sehen müssen. 

Die Menütechnik wird überall voll 
unterstützt, so daß auch das zu er¬ 
stellende Programm auf diese Wei¬ 
se mit fehlersicheren Eingaberouti¬ 
nen ausgestattet werden kann. 

Die Generierung eines Program¬ 
mes erfolgt in zwei Schritten. Zuerst 
geben Sie einen Ablaufplan ein, In 
einer Frage- Antwortsitzung müssen 
Sie dann alle Detailfragen, die der 


Programmgenerator noch benötigt, 
beantworten. 

Der Ablaufplan ist eines der weni¬ 
gen. Dinge, die Sie vorab selbst pla¬ 
nen müssen. Ein Ablaufplan im Sin¬ 
ne vom Basic Bär ist eine logische 
Aufeinanderfolge von Arbeitsschrit¬ 
ten, die Sie benötigen, um Ihr ge¬ 
plantes Programm zu verwirklichen. 
Der Programmgenerator nutzt die 
Tatsache, daß die einzelnen Verar¬ 
beitungsschritte in den meisten Pro¬ 
grammen ähnlich sind. Die Ausgabe 
einer Bildschirmmaske und das an¬ 
schließende Einlesen von Daten ist 
ein solcher Arbeitsschritt. Soll zum 
Beispiel in eine Datei mit dem Na¬ 
men »Telefonliste« emgele^n wer¬ 
den, so wird dies mit folgeriuem Be¬ 
fehl umschrieben: 

KEYBORD INPUT USING TELE¬ 
FONLISTE FIELDS 

Wenn Sie im Programm eine Ab¬ 
frage einbauen, und abhängig da¬ 
von an eine bestimmte Stelle im Ab¬ 
laufplan verzweigen wollen, müssen 
Sie etwa folgendes schreiben: 

ASK USER »FERTIG ?«: BRANCH 
IF YES TO LINE X 

Wie die Bildschirmmaske und die 
Datei überhaupt auf gebaut sein soll, 
und welche Datenfelder denn ein¬ 
gelesen werden sollen, wird wie die 
Sprungadresse erst in der Codege¬ 
nerierung abgefragt. 

Das generierte Basic- 
Programm 

Wenn der Ablaufplan vollständig 
eingegeben worden ist, wird Zeile 
um Zeile der Basic-Code generiert. 
Das Floppy-Laufwerk kommt dabei 
kaum zur Ruhe, In dieser Phase be¬ 
antworten Sie die Fragen nach dem 
Aufbau von Bildschirmmasken, 
nach dem Druckbild von Listen, 
nach Sortierkriterien oder nach den 
Sprungzielen bei Verzweigungen. 
Den Aufbau von Bildschirmmasken, 
Listen und den Ablaufplan können 
Sie abspeichern, um später auf die¬ 
se wieder zurückgreifen zu können. 


Anschließend werden Ihre ge¬ 
samten Angaben in Basic übersetzt, 
ähnlich wie ein Makroassembler 
Makroanweisungen in Maschinen¬ 
sprache übersetzt. 

Ein so erzeugtes Programm ist 
nicht sehr übersichtlich. Will man 
später Änderungen vornehmen, 
muß man sehr viel Zeit aufwenden, 
um sich in dem Programm zurecht 
zu finden. Wie zu erwarten war, ist 
ein mit Basic Bär erstelltes Pro¬ 
gramm erheblich länger als ein 
selbst erstelltes. Der Unterschied 
wird aber erheblich geringer, je 
komplexer die Anforderungen an 
das Programm sind. Das Zeitverhal¬ 
ten ist für ein Basic-Programm recht 
gut. Jedem ernsthaften Anwender 
sei allerdings ein Basic-Compiler 
empfohlen, um so das generierte 
Programm zu beschleunigen. 

Dateibearbeitung und 
andere Funktionen 

Alle Routinen zur Dateibearbei¬ 
tung sind in Basic Bär fest eingebaut. 
Sie arbeiten allerdings nur mit relati¬ 
ven Dateien. Wer also eine andere 
Dateiform wünscht, muß die Routi¬ 
nen wie Dateiöffnen, Satzlesen, Posi¬ 
tionieren auf einen bestimmten Satz 
oder Satzschreiben selbst program¬ 
mieren. Dies ist jedoch ohne weite¬ 
res möglich, da innerhalb des Pro¬ 
grammgenerators auch sämtliche 
Basic-Befehle zugänglich sind. Sehr 
positiv ist zu erwähnen, daß mit ei¬ 
nem SORT-Kommando gearbeitet 
werden kann, mit dem nach bis zu 
drei Schlüsseln sortiert wird. 

Durch eine automatische Ausrich¬ 
tung und Überprüfung von numeri¬ 
schen Feldern in den Bildschirm¬ 
masken und einer automatischen 
Dokumentation der gesamten Ein¬ 
gaben bei der Generierung werden 
die von Basic Bär erstellten Pro¬ 
gramme sehr fehlersicher und war¬ 
tungsfreundlich. 

Basic Bär gehört in die Klasse der 
guten und durchdachten Dienstpro¬ 
gramme. Der Preis von 425 Mark 
wird den Anwenderkreis sicherlich 
einschränken. Aber trotzdem ist die¬ 
ser Programmgenerator für jene in¬ 
teressant, die sowohl mit dem auf¬ 
wendigen Selbstprogrammieren als 
auch mit den starren Programmen 
aus der Dose unzufrieden sind, (rg) 
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Die Programmiersprache Förth ist für immer mehr Mikrocomputer erhältlich, und das 
nicht ohne Grund. Forth ist eine sehr mächtige Sprache, die in einem 

gewissen Sinne die positiven Seiten 
von Basic, Pascal und 


******** 64FORTH 1.2 ******** 
COPYRIGHT 1983 

IUNAH ENG1NEERED SOFTWARE BV T.J.ZIMHER 


ECIHAL 



DÜP 

§ t>VP 0« 8BRANCH -35 



Assembler in sich vereint. Für 
den Commodore 64 ist jetzt 
eine der leistungsfähigsten 
Forth-Versionen als Steckmodul 
erhältlich: Das 64 Forth 
von Human Engineered Software. 


Bild 2. Das 64 Forth ist 

als Steckmodul für den C 64 und den 

VC 20 erhältlich j 


B ei dieser Forth-Version für den 
C 64 handelt es sich um ein im 
Sprachumfang stark erweitertes 
FIG-Forth. Die Abkürzung FIG steht 
dabei für Forth Interest Group und 
bezeichnet eine unabhängige Grup¬ 
pe von Forth-Enthusiasten, die sich 
die Standardisierung und Verbrei¬ 
tung von Forth zum Ziel gesetzt hat. 
Bei einer Sprache wie Forth, die vom 
Anwender praktisch beliebig erwei¬ 
terbar und veränderbar ist, er¬ 
scheint ein solcher Standard auch 
dringend notwendig, weil sonst der 
Softwareaustäusch zwischen den 
Anwendern fast unmöglich würde. 
Das 64 Forth hält sich sehr eng an 
den FIG-Standard, was dem Benut¬ 
zer unmittelbar zugute kommt: Die 
meisten für andere Computer ent¬ 
wickelten Forth-Programme sind, 
solange nicht spezielle Hardware- 
Eigenschaften ausgenutzt werden, 
mit minimalen Änderungen sofort 
auf dem C 64 lauffähig. 

Forth zeichnet sich ja generell 
schon durch einen großen Befehls¬ 
vorrat aus, Im 64 Forth wurde jedoch 
der Grundwortschatz des FIG-Stan- 
dards nochmals stark erweitert. 
Über 500 Befehle stehen zur Verfü¬ 
gung. Damit man hier noch den 
Überblick behält, sind diese Befeh¬ 
le auf vier Vokabulare aufgeteilt: 
FORTH, EDITOR, SYSTEM und AS¬ 


SEMBLER. Ein Vokabular, wird ein¬ 
fach durch Angabe seines Namens 
aufgerufen oder aktiviert. 

Zu Anfang ist nur das normale 
Forth-Vokabular zugänglich. Will 
man längere Forth-Programme oder 
Texte eingeben, dann ruft man ein¬ 
fach das Editor-Vokabular auf und 
kann nun alle vorhandenen Befehle 
zum Editieren von Texten nutzen. 
Das System-Vokabular enthält Be¬ 
fehle zum Zugriff auf die Betriebssy¬ 
stemebene. 

Obwohl Forth-Programme in der 
Regel um Größenordnungen 
schneller als Basic-Programme lau¬ 
fen, können doch ab und zu zeitkriti¬ 
sche Situationen eintreten. In die¬ 
sem Fall ruft man das Assembler- 
Vokabular auf und hat sofort einen 
6502-Macro-Assembler zur Verfü¬ 
gung. 

Schon bei einem ersten Blick ins 
Inhaltsverzeichnis des (leider nur 
englischen) Handbuchs fällt es auf: 
Das 64 Forth verfügt in Addition zum 
FIG-Forth-Standard über eine ganze 
Reihe von Befehlen, um spezielle 
C 64 — Eigenschaften zu unterstüt¬ 
zen. 

Mit BGROUND und BORDER wer¬ 
den zum Beispiel die Hintergrund- 
und die Rahmenfarbe gewählt. Mit 
NEWSPRITE kann man innerhalb ei¬ 
ner Bildschirmmaske sehr komforta¬ 



bel neue Sprites entwerfen. Sprite- 
daten können in spezielle Sprite- 
Dateien geschrieben oder daraus 
gelesen werden. Mit dem Befehl 
SHOW werden Sprites sichtbar ge¬ 
macht, mit HIDE verschwinden sie 
wieder vom Bildschirm. Mit weite¬ 
ren Befehlen kann man Sprites über 
den Bildschirm bewegen, einfärben 
und vergrößern. Natürlich ist auch 
der Mehrfarbenmodus möglich. 

Wer sich schon einmal mit den di¬ 
versen POKE-Befehlen in Basic ab¬ 
gemüht hat, um ein paar Sprites 
über den Bildschirm zu bewegen, 
der wird diese Möglichkeiten des 
64 Forth sehr zu schätzen wissen. 

Ganz ähnlich verhält es sich auch 
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bei den Toneffekten: Wo man in Ba¬ 
sic viele Zeilen mit POKE-Befehlen 
braucht, um ein paar Noten zu spie¬ 
len, geht das mit 64 Forth im Klartext 
und wesentlich übersichtlicher. Der 
Befehl VOICE1 wählt zum Beispiel 
den Tongenerator 1 an, mit TRIAN- 
GLE, SAWTOOTH, SQUARE oder 
NOISE wird die Wellenform ausge¬ 
wählt. Weitere Befehle steuern Fre¬ 
quenz, Hüllkurve, Lautstärke und 
andere Faktoren. Insgesamt gibt es 
40 (!) Befehle zur Steuerung des 
Synthezisers. 

Auch die Ansteuerung externer 
Geräte macht mit 64 Forth keine 
Schwierigkeiten. Im SYSTEM Vöka- 
bular gibt es diverse Befehle zur Da¬ 
tenkommunikation mit Drucker, 
Floppy oder Kassette. Der Befehl 
PRON ersetzt beispielsweise die 
Basic-Befehlsfolge »OPEN 1,4:CMD 
1«. Um Befehle an die Floppy zu 
schicken, braucht nicht umständlich 
ein Kommandokanal eröffnet wer¬ 
den, sondern es reicht der CMD- 
Befehl. Um zum Beispiel eine Disket¬ 
te zu formatieren, schreibt man in 64 
Forth: CMD N:Name,ID. 

Außerdem können die meisten 
Kernal-Routmen des Betriebssy¬ 
stems einfach mit ihrem Namen auf¬ 
gerufen werden, wodurch sich eine 
hohe Flexibilität beim Datenaus¬ 
tausch über den seriellen Bus er¬ 
gibt. 

Bemerkenswert sind die recht 
komfortablen Testhilfen, die 64 Forth 
zur Verfügung stellt. Mit den Befeh¬ 
len TRACE, STEP, EMULATE und 
CONT kann die Ausführung von 
Forth-Befehlen überwacht werden. 
Zusätzlich ist ein Decompiler vor¬ 
handen, der mit SOURCE aufgeru¬ 
fen wird und compilierte Forth- 
Wörte wieder zurückübersetzen 
kann (Bild 1). Derartig umfangreiche 
Debug-Funktionen sucht man bei 
anderen Forth-Compilern in der Re¬ 
gel vergeblich. 

Im Gegensatz zu der recht einfa¬ 
chen Speicherverwaltung von Basic 
benutzt Forth das Konzept des vir¬ 
tuellen Speichers. Vereinfacht ge¬ 
sagt bedeutet das die Aufteilung 
des verfügbaren Speichers in klei¬ 
ne Abschnitte, sogenannte Screens 
oder Textfelder, auf die über eine 
Nummer zugegriffen wird. Dabei ist 
es nicht nötig, daß sich alle Screens 
zur gleichen Zeit im Hauptspeicher 


■■■■■■ 

befinden. Die meisten Screens sind 
daher als relative Datei auf einer 
Diskette angelegt und werden nur 
bei Bedarf geladen. 

64 Forth bietet dabei noch die Be¬ 
sonderheit, daß eine solche virtuel¬ 
le Speicherverwaltung auch ohne 
Floppy ermöglicht wird. Die einzel¬ 
nen Textfelder werden dabei in der 
Reihenfolge ihrer Numerierung mit 
der Datasette wie normale Program¬ 
me aufgezeichnet. Ein Pufferspei¬ 
cher von 16 Textfeldern im RAM, be¬ 
grenzt die Anzahl der nötigen Kas¬ 
settenoperationen. 

Jedes Textfeld kann nun für sich 
mit dem Texteditor bearbeitet wer¬ 
den. Bei fast allen Forth-Versionen ist 
zu diesem Zweck nur ein einfacher 
zeilenorientierter Editor vorhanden. 
64 Forth stellt seine Kompatibilität 
dadurch unter Beweis, daß es eben¬ 
falls über einen solchen umständ¬ 
lich zu bedienenden Zeileneditor 
verfügt, der ganz normal mit n EDIT 
aufgerufen wird, wobei n die Num¬ 
mer des zu editierenden R^üfeldes 
ist, 


Der Full-Screen-Editor 


Daneben aber gibt es in 64 Forth 
auch einen »Full-Screen-Editor«, wie 
er vom Basic her bekannt ist. Man 
drückt im Edit-Modus die Tasten¬ 
kombination »Shift« und »INST/DEL«, 
und es erscheint augenblicklich das 
gesamte zu editierende Textfeld. 
Wie von Basic her gewohnt, kann 
man nun mit Hilfe der Cursourtasten 
über den gesamten Bildschirm .fah¬ 
ren und fehlerhafte Textstellen lö¬ 
schen oder einfach überschreiben. 

Die Funktionstasten sind dabei mit 
diversen hilfreichen Funktionen be¬ 
legt, zum Beispiel Vorwärts- und 
Rückwärtstabulator und Suchfunk¬ 
tionen. Auf Tastendruck kann man in 
das vorhergehende oder nachfol¬ 
gende Textfeld wechseln. 

Als weitere Besonderheit versteht 
der Editor eine Reihe von »Word- 
star«-kompatiblen Control-Funk¬ 
tionen. Statt mit der »CTRL«-Taste 
werden diese Funktionen jedoch 
durch gleichzeitiges Drücken der 
»Commodore«-Taste und eines 
Buchstabens ausgelöst. Wer also an 
das Arbeiten mit »Wordstar« ge- 
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wohnt ist, wird sich mit diesem Edi¬ 
tor ebenfalls gut zurechtfinden. 

Ganz hartgesottene Forth-Pro- 
grammierer, denen soviel Bedie¬ 
nungskomfort schon dekadent er¬ 
scheint, haben ja noch die Möglich¬ 
keit, stattdessen mit dem zeilen¬ 
orientierten Editor zu arbeiten. 

Das zu magere Handbuch ist in 
Englisch geschrieben, eine deut¬ 
sche Übersetzung ist zur Zeit nicht 
geplant. 

Auf 155 kleinformatigen Seiten 
wird eine kurze Einführung in Forth 
gegeben, die aber dem Anfänger 
vermutlich nicht allzuviel sagen 
wird. In kurzen Kapiteln werden 
dann der Texteditor und die wichtig¬ 
sten Forth-Befehle erläutert. Es fol¬ 
gen Abschnitte über die Speicher¬ 
belegung von Forth, über die I/O- 
Organisation und über den inte¬ 
grierten 6502-Macro-Assembler, Li- 
stings einer Anzahl von Forth-Utilitys 
und eine Kurzbeschreibung aller 
Befehle runden das Handbuch ab. 

Durchweg alle Kapitel sind aber 
recht kurz und knapp ausgefallen, 
so daß man häufig gezwungen ist, 
entweder in anderen Büchern nach¬ 
zuschlagen oder einfach herumzu¬ 
experimentieren. Immerhin, man 
findet die wichtigsten Informatio¬ 
nen. Dennoch wäre ein deutsches, 
etwas ausführlicheres Handbuch si¬ 
cherlich wünschenswert. 

Insgesamt gesehen ist das 64 
Forth sicherlich eine der besten 
Forth-Versionen, die derzeit über¬ 
haupt für Mikrocomputer erhältlich 
sind. Deutliche Pluspunkte sind der 
hervorragende Editor und der um¬ 
fangreiche Befehlssatz, insbesonde¬ 
re die vielen Befehle für Spritegrafik 
und Sounderzeugung, die man im 
Commodore-Basic manchmal 
schmerzlich vermißt. Der integrier¬ 
te Assembler ist eine wertvolle Hilfe 
bei der Lösung zeitkritischer Pro¬ 
bleme. 

Das 64 Forth kann in Deutschland 
als Steckmodul (Bild 2) für den C 64 
über »Die Forth-Quelle« in 7820 
Titisee-Neustadt zum Preis von 198 
Mark bezogen werden. Eine Ver¬ 
sion für den VC 20 ist ebenfalls er¬ 
hältlich. Leider ist das Modul nach 
Auskunft der Anbieter auf dem trag¬ 
baren SX 64 aufgrund doch vorhan¬ 
dener geringer Hardwareunter¬ 
schiede nicht lauffähig. (ev) 
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Die erste Schwierigkeitsstufe von »Lode Runner« 




Wer auf seinem 
Heimcomputer 
sein Reaktions¬ 
vermögen te¬ 
sten will, dem 
sei Lode Run¬ 
ner empfohlen, 
ein Spiel mit 
150 (!) ver¬ 
schiedenen 
Spielfeldern. 


D as Spiel Lode Runner ist ein 
Actionspiel aber dennoch kein 
Schießspiel und wird für Apple 
II, 11+ und Ile, Atari 400/800/XL, 
VC 20, Commodore 64 sowie IBM 
PC angeboten. 

»Du bist ein gut trainierter Com¬ 
mander im unendlichen Welt¬ 
raum..,« — so verheißungsvoll be¬ 
ginnt die Spielanleitung (natürlich in 
Englisch abgefaßt). Man muß auch 
wirklich gut trainiert sein, um alle 
160 Spielfelder zu durchlaufen. Ich 
selbst habe allein sechs Ständen be¬ 
nötigt, um bis zum siebten Spielfeld 
vorzudringen. Man hat die Möglich¬ 
keit, sich ganze 255 eigene Spielfel¬ 
der zu erstellen und diese auf Kas¬ 
sette oder Diskette abzuspeichern. 


Dies ist mit dem im Spiel integrier¬ 
ten Game Generator möglich. Der 
Generator ist sehr einfach zu bedie¬ 
nen. Obwohl die Bedienung sehr 
einfach ist, wäre es angebracht, in 
der Spielanleitung zu erwähnen wie 
man den Game Generator startet. 
Ich wollte die Suche nach dem Ge¬ 
nerator schon aufgeben, als ich zu¬ 
fällig nach dem Start des Spieles die 
»E«-Taste drückte und sogleich mein 
eigenes Spielfeld entwerfen konnte. 

Doch nun noch einmal zum Spiel 
selbst. 

Der Spieler muß in jedem Feld al¬ 
le Goldklumpen sammeln. Doch 
das Einsammeln der Punkte in dem 
Labyrinth aus Mauern, Leitern und 
Stangen ist nicht so einfach, da man 
hierbei von einigen Feinden verfolgt 
wird. So braucht man schon einiges 
Geschick und Reaktionsvermögen, 
um alle Goldklumpen zu sammeln 
und nicht gefangen zu werden. 

Die grafischen und musikalischen 
Fähigkeiten des VC 20 werden nicht 
gerade voll ausgeschöpft. Der Spie¬ 
ler bewegt sich zwar fließend aber 
die Verfolger »hüpfen« nur ruckartig 
von Kästchen zu Kästchen. 

Fazit: 

Wer Abwechslung und Spannung 
liebt, dem sei dieses Spiel empfoh¬ 
len, da wegen der großen Varia¬ 
tionsberichte und der Möglichkeit, 
selbst kreativ zu werden, die Spiel¬ 
motivation bestimmt nicht nachläßt. 

(Christian Spitzner) 


A llen Arcade-Spiel-Freunden ist 
er sicherlich bekannt...Zaxxon. 
Der gefährliche Kampfroboter 
treibt nun schon seit Anfang '84 sein 
Unwesen auf dem Home-Computer- 
Markt. Allerdings hört man schon ei¬ 
nige Seufzer...ist der Riesenhit doch 
kleiner als man erwartet hatte? Nun, 
zur Handlung: Man fliegt mit einem 
Raumkreuzer über einen Asteroi¬ 
dengürtel, versucht möglichst viel 
»Feindliches« abzuschießen und 
steht dann nach einigen Prüfungen 
vor »Zaxxon«, einem gefährlichen 
Kampfroboter. Dieser erscheint 


zwar nur kurz, trotzdem muß man 
sich mit ihm ein heißes Gefecht lie¬ 
fern. Nach dieser Konfrontation be¬ 
ginnt alles wieder von vorne. — Nur 
etwas schwerer. Die starke pseudo- 
3D-Grafik wertet das Spiel zwar auf, 
jedoch hilft selbst die beste Grafik 
nicht, über Schwächen hinwegzu¬ 
täuschen, die nach einigen Spielen 
deutlich werden: So wird es dem 
Spieler leicht langweilig, wenn er 5 
bis 6 mal immer wieder dieselbe 
Szene überfliegt und sich nichts än¬ 
dert, außer dem Schwierigkeits¬ 
grad. Generell ist zu sagen, daß a) 




Zaxxon: 

Eine 

typische 

Spielszene 


die Erwartungen der Käufer zu hoch 
gesteckt waren und b) daß Zaxxon 
diese hohen Ansprüche nicht erfül¬ 
len kann — und das schon gar nicht 
auf Dauer! Alles in allem, Zaxxon ist 
nicht das, was man so hört, wird aber 
sicher bei den Weltraumabenteu¬ 
ern einen gehobenen Rang einneh¬ 
men, den er sich trotz alledem ver¬ 
dient hat. (Oliver v. Quadt) 
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Wenn Sie 
zu den Zeitge- 
nossen gehören, denen das 
nur auf dem Passagiersitz eines Linien- 
igzeugs vergönnt ist, dann gibt es etwas Neues für Sie 


und Ihren Commodore 64. 

D er Flight-Simulator II von Sublo- 
gic im Vertrieb der Lucius 
Computer-Programme (190 
Mark) stellt ohne Übertreibung alle 
bekannten Flug-Programme in den 
Schatten. 

Das Fluggerät ist eine Piper Pa 
28-181 Archer II. Ihre Instrumente 
und Flugeigenschaften werden täu¬ 
schend echt simuliert. Über 80 Flug¬ 
häfen kann der Computer-Pilot in 
den USA ansteuern. Ein riesiges Ter¬ 
rain, das nur die wenigsten überflie¬ 
gen werden. Die relativ realistische 
Abbildung des Geländes ist allein 
schon ein Genuß für das Auge. 

Nun zum Fluggeschehen. Je nach 
Können und vor allem Mut ist es 
möglich, zwischen drei verschiede¬ 
nen Schwierigkeitsgraden zu wäh¬ 
len: Dem »realistic«, dem »easy« und 
dem »slew« Modus. Die höchsten An¬ 
sprüche an die Fähigkeiten des Pilo¬ 
ten stellt der Realflug. Hier ist vom 
Starten des Motors über den Kampf 
mit den verschiedensten Handicaps 
und Defekten bis zum sensiblen 
Flugverhalten alles vorhan¬ 
den. In den vollen Ge¬ 


nuß der Landschaft und der Flug¬ 
umgebung kommt man am besten 
durch Anwählen des »slew« Modus. 
Das Flugzeug fliegt dann wie ein 
Hubschrauber. 

Zu Beginn der fliegerischen Lauf¬ 
bahn ist es sinnvoll, der ausgezeich¬ 
neten (noch englischen) Anleitung 
zu folgen, Dadurch erspart man sich 
so machen unfreiwilligen »Crash«. 

Der Horizont und die Landschafts¬ 
merkmale bewegen sich beim Flie¬ 
gen naturgetreu, entsprechend der 
jeweiligen Flugposition über den 
Bildschirm. Aber Vorsicht; nicht die 
Instrumente vergessen! Schnell 
kann es geschehen, daß man über¬ 
steuert oder zu niedrig fliegt. 

Starten möchte ich in New York. 
Dazu sind die Koordinaten des Ab¬ 
flugortes im Editmodus emzugeben; 
in diesem Fall ist das 17070/20990. 
Nach kurzen Diskettenmanövern, 
die leider im ganzen Spiel immer 
wieder notwendig werden, er¬ 
scheint New York auf dem Bild¬ 
schirm. Vorsichtig die Geschwindig¬ 
keit erhöhen, leicht nach oben zie¬ 
hen, sanft eine Rechtskurve einlei- 
ten, nur nicht übersteuern und 
immer den Höhenmesser im 
Auge behalten — ein Kom¬ 
mando folgt auf das näch¬ 
ste. Vor mir erscheint das 
World Trade Center 
mit seinen beiden 
Türmen. Der Aben¬ 
teurer in mir wird 
wach. Etwas tiefer 
noch, und da sind 
sie auch schon, im¬ 
mer größer und be¬ 
drohlicher werdend. 
Als ich zwischen den 
Türmen durchfliege, wage 
ich einen Blick nach unten 
und was ich sehe läßt meinen Atem 
stocken: Ich bin zu tief! Dies waren 


meine letzten Gedanken. Als ich 
»aufwachte«, stand nur noch »crash« 
auf dem Bildschirm. 

Nicht unerwähnt soll auch das aus¬ 
wählbare Actionspiel im Flight II 
bleiben. Nicht etwa, daß Flight II oh¬ 
ne das Luftkampfspiel »World War I 
Ace« kein vollständiges Programm 
wäre. Im Gegenteil, beide Program¬ 
me könnten auch separat verkauft 
werden. Die Aufgabe des Piloten 
besteht beim »World War I Ace« dar¬ 
in, feindliche Stellungen, Depots 
und Fabriken zu beschießen. Das 
Flugzeug ist dazu mit Maschinenka¬ 
nonen und Bomben bewaffnet. Da¬ 
mit der Angriff realistischer wird, 
wehrt sich der Feind mit sechs äu¬ 
ßerst aufdringlichen Jagdfliegern. 
Diese sind nur durch waghalsige 
Flugmanöver und intensiven Emsatz 
der Bordkanone abzuschütteln. 

Es ist unbestreitbar, auch dieses 
Spiel begeistert, mich persönlich 
mehr durch die gelungene Grafik 

und Animation, als durch die Spiel¬ 
idee. Wer aber gerne als »Richtho¬ 
fen« durch die Lüfte jagen möchte, 
wird sicher einige seiner bisherigen 
»Actionspiele« zumindest vorläufig 
beiseitelegen. 

Insgesamt, wobei der Flugsimula¬ 
tor der wichtigere Teil ist, kenne ich 
kein Programm, das den Flight II in 
bezug auf Spielmotivation, Grafik, 
Beeinflußbarkeit der Handlung und 
Abwechslungsreichtum erreichen 
könnte. Am besten gefällt mir aber, 
daß mit Flight II ein Unterhaltungs¬ 
programm geschaffen wurde, das 
sicher nicht nur die jüngere Genera¬ 
tion begeistert. (Arnd Wängler) 
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Das Programm für den 
Commodore 64 mit Disket¬ 
tenlaufwerk und Epson- 
Drucker RX-80 mit Data- 
Becker Interface (simuliert 
einen Commodore-Drucker 
auf dem RX-80) erlaubt die 
Verwaltung der auf Diskette 
gespeicherten Programme. 
Man legt nur eine Diskette 
ein, dann lädt der Computer 
das Inhaltsverzeichnis der 
Diskette und druckt es auf 
dem Bildschirm aus. Nun 
tippt man nur noch »J« für Ja 
oder »N« für Nein ein, ob der 
Computer den Programmna¬ 
men in seine Liste aufneh¬ 
men soll oder nicht. Danach 
gibt man ein, unter welcher 
Kategorie das Programm 
eingeordnet werden soll. 
Zur Auswahl stehen allge¬ 
meine, Spiel-, Hilfs- und 
Sprachprogramme. 

Im Menü kann man zwi¬ 
schen dem alphabetischen 
Sortieren der Liste, Spei¬ 
chern der Liste und dem Auf¬ 
listen und Löschen von Pro¬ 
grammen wählen. Beim al¬ 
phabetischen Sortieren wer¬ 
den zunächst alle Namen, 
die zweimal gespeichert 
sind, gelöscht, Dann wird die 


Liste nach ASCII-Wertigkeit 
geordnet. Das Abspeichern 
der Liste erfolgt in eine se¬ 
quentielle Datei. Auf ein 
»Random-File« wurde ver¬ 
zichtet, da sonst das Pro¬ 
gramm um einiges länger 
und langsamer geworden 
wäre. Bei »Programme lö¬ 
schen« kann man Programm¬ 
files löschen und umbenen¬ 
nen. Will man umbenennen, 
so gibt man zuerst den alten, 
noch gespeicherten Namen, 
dann den neuen Namen des 
Programmes ein. 

Beim Auflisten von Files 
kann man die Programme 
entweder auf dem Bild¬ 
schirm oder dem Drucker 
ausgeben. Dabei kann man 
alle oder nur einzelne Krite¬ 
rien auflisten. 

Zur besseren Übersicht 
und zum schöneren Ausse¬ 
hen werden die Farben Rot, 
Gelb, Blau, Schwarz und 
Weiß benutzt. Diese werden 
in Control-Strings abgespei¬ 
chert, da sonst das Pro- 
grammlisting sehr unüber¬ 
sichtlich und beim Eintippen 
schwierig zu lesen wäre. 

(Michael Börner) 






ElN 


^stWuci: 


Von 


'»-Es 


2> 




S *EHT 


Ä&5-- 

IISä'" 5 "® 

§§: ß 

ro R s p IEl 

—-—bl "*• s: Sj*' 




^ISC Sä-; 


'■'c-SAve' 


*E~Nei.i HL Tl JHr. 


... w 

~ URBo m Pe mHSr* e.’ 


-SS; 



99 GOTOlOOOO 

100 GET m- I FA*= ■■ THEN100 
110 RETURN 

150 GETAT-: IFA*< >CHR$ < 13) THEN 150 
160 RETURN 
400 PRINTCK* 

410 SYSAU,11,10,WW$"~ISKETTE EINLEGEN" 
420 SYSAU ,13,14," DANN ,, AN$R$ ,, <_“| :R 

EM <RETURN> 

430 GQ3UB150 
440 RETURN 
500 PRINTCK* 

505 SYSAU,3,9,G$"~ISKETTE MIT /AMENLISTE 
EINLEGEN" 

510 SYSAU, 12, 14, "DANN ,, AN$BL$ ,, <_-| 

:REM <RETURN> 

515 GOSUB100:IFA$< >CHR$(13)THEN515 
517 RETURN 
700 PRINTCG* 

710 SYSAU ,7,10, AN^-R^"KEINE NAMEN GESPEIC 
HERT !" 

720 GOSUB10O:GOTO1000 

lOOO REM" ,- 

REM" |MENUEI 

REM" V_ü 


1001 

1002 

1010 

1020 

1030 

1035 

1040 


Listing 

»Software- 

Katalog« 


PR I NTCfCtCHR^ (8) 

PRINTMB* 

SYSAU,17,8,ß$"\ENUE" 

SYSAU, 17,9,"-" 

SYSAU, 6, 12,WW*"1. •>,NHALTSVERZEICHNI 


S LESEN.." 

1045 SYSAU,6,14,"2. 
EN-" 

1050 SYSAU,6,16,"3. 


ALPHABETISCH SORTIER 


“ROGRANMLISTE SAVEN. 


1060 SYSAU,6,1B,"4. “ROGRAMME LDESCHEN. 


72 Utfaj* 
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1070 SYSAU,6,20,"5. “ROGRAMME LISTEN- 

II 

1100 GÜSUB100 

1110 IFA*<>"1"ANDA*<>"2"ANDA*<>"3"ANDA*< 
>"4"ANDA$<>"5"THEN1100 

1120 A=VAL(A*):0NAG0T03000,3600,2500,700 
0,5000 

2000 REM" /- 

2001 REM" |DATEN AUS DATEI LESEN| 

2002 REM" - 

2010 G0SUB500 

2020 CL0SE2:0PEN2,8,2,"NAMENLISTE,S,R" 

2030 INPUT#2,P0 

2040 IFP0=0THEN21OO 

2050 FORN=1TOPO—1 

2060 INPUT#2,WR*CN) 

2070 NEXTN 

2080 CL0SE2:GOTO1000 

2100 REM" - 

2101 REM" |NEUE DATEI EROEFFNEN| 

2102 REM" - 

2110 SYSAU,9,20,AN*R£"/£UE -ATEI EROEFFN 
EN 2" 

2120 GGSUB100: I FA*< > " J " ANDA*< > " N " THEN212 
0 

2130 IFA*= " N " THEMGOT02000 
2140 P0=1:CL0SE2 

2150 0PEN2, 8,2, " § :NAMENLISTE, S, W " 

2160 PRINT#2,PO 
2170 CL0SE2 
2200 GOTO1000 

2500 REM" - 

2501 REM" s NAMEN ABSAVEN | 

2502 REM" - 

2505 I FF‘0< 2THENB0TQ7OO 

2510 G0SUB500 

2520 0PEN2,8,2,"§:NAMENLISTE, S , W " 

2530 PRINT#2,PO 
2540 FGRN=1TOPQ—1 
2550 PR I NT#2, WR* (N) 

2560 NEXT 

2570 CL0SE2 : GOTO1000 

3000 REM" ,--- 

3001 REM" iINHALTSVERZEICHNIS LADEN! 

3002 REM" L- J 

3005 R=0 

3010 G0SUB40Ö 
3015 PRINTCE* 

3020 SYSAU,3,3,G*"EINLESEN DES INHALTSVE 

RZEICHNISSES":PRINT;PR=PO 

3025 CLOSE15: OPEN 15,8,15 , " 10 11 : CL0SE2 : OPE 
N2,8,0, "*" 

3030 F0RT=0T012:GET#2,A*,B*:NEXT 

3035 GET#2,A*,A*:IFSTTHENCL0SE2:S0T03120 

3040 GET#2,A*,A* 

3050 GET#2 , A*: I FA* = " " THEN3035 
3060 IFA*<>CC*THEN3050 

3070 C*="":R=R+1:C*CR)=""sP*(R> = " ":FL=0 
3080 F0RT=0T016:GET#2, A*: IFA*< >CC*ANDFL= 
OTHENC*(R)=C*(R)+A*:NEXT:G0T03100 
3090 FL=1:NEXT 

3100 IFINT (R/2) =R/2THENPRINT: PRINTS*C* (R 
— 1)TAB(20)C* C R); 

3105 PRINTTAB(37)P*(R)G*; 

3110 GET#2,A$,P*CR):G0TÜ3050 

3111 REM" -- 

3112 REM" !NAMEN IN DATEI UEBERNEHME 

N ?| 

3113 REM" V- 

3120 PRINTCG*:PRINTG*"UEBERNEHMEN ?" 

3121 IFR=0THEN1000 

3125 FORT=lT0RSTEP2:PRINT:PRINTC*C T)TAB < 
17)P* C T)TAB < 20)C*(T+1); 


3130 PRINTTAB(37)P* <T+1);:NEXT:FOKE198,0 
3135 R2=l 

3150 FORT=1 ■TOR:P=T*20+55396:FORTT=OTQ19 
3160 POKEP+TT,0:NEXT 
3170 G0SUB100 

3180 IFA*<>"N"ANDA*<>"J"THEN3170 

3190 IFA*="J"THENWR*(PO)= " " +C* <T >:PO=PQ 

+1:F1=1:G0T03300 

3200 IFA*="N"THENF1=12:GOT03300 

3300 F0RTT=OTO18:POKEP+TT,Fl:NEXT:NEXT 

3400 REM" f -- 

3401 REM" |WELCHE SPIELART ?! 

3402 REM" -- ! 

3403 I FF'0=PRTHEN 1000 
3405 PRINTCG* 

3408 SYSAU,1,1,AN*R*"G"AU*G*"AME/ n AN*R* n 
H"AU*G*"ILFSPRG/": 

3410 PRINTAN*R*"S"AU*G*"PRACHPRG/"AN*R*" 
A"AU*G*"LLGEMEIN" 

3412 PRINT:PRINT 

3415 FORN=PRTOPO-1 

3417 IFLENCWR*(N))>19THEN3425 

3420 W=LENCWR*CN)):F0RM=WT018:WR* CN)=WR* 

(N) + " ":NEXTM 

3425 PRINTRIGHT*(WR*C N) ,LEN C WR*(N))-1); 
3430 GOSUB100:1FA*<>"G"ANDA*<>"A"ANDA*<> 
"S"ANDA*<>"H"THEN3430 

3440 IF A*= "G"THENF'RINTTAB <20) "SPIEL 
3450 IFA*= "A"THENF'RINTTABC20) "ALLGEMEIN 
3460 IF A*= " S " THENF'R I NTT AB < 20) "SPRACH 
3470 IFA*="H"THENPRINTTABC20)"HILFE 
3480 B*=MID*(WR*(N),2,LEN(WR* CN)) ):A*=A* 
+B*:WR* CN)=A*:NEXT 

3500 PR I NT: PR I NT: PR INTAN*R* " QK" AU* " ? " 

351O GOSUB100:IFA*<>"J"ANDA*<>"N"THEN351 
0 

3520 Ir A*="N"THEN3400 
3525 GOTO1000 

3600 REM" - 

3601 REM" !FILES LOESCHEN FALLS DORF 

ELT! 

3602 REM" - 

3603 F'RINTCG* 

3604 SYSAU,13,11, R*"BITTE WARTEN !" 

3605 IFP0=2THEN1000 
3610 FQRN=1TOPO-1 

3620 FORM=1TOPO-1:IFM<>NTHENIFWR* CN)=WR* 

CM)THENG0T037O0 

3630 NEXTM:NEXTN:GQT03800 

3700 FORQ=MTOPO—1 

3710 WR*<Q)=WR*(Q+1) 

3720 NEXTQ 

3730 PO=PO-1: WR* C PO) = " " : WR* C F'0+1) = ” " : GOT 
03630 

3800 REM" - 

3801 REM" iALPHABETISCH SORTIEREN| 

3802 REM" -O 

3805 PRINTCG* 

3810 SYSAU,13,11,RS"BITTE WARTEN !!" 

3820 FORO=1TOPO—2 

3830 A*=WR* CO):B*=WR* C 0+1) 

3840 IFA*<B*THENNEXT:G0T8390Q 
3850 WR*(0+1>=A*:WR*(0)=B* 

3860 NEXTO 

3900 F0RN=lT0P0-2 

3910 IFWR* (NX WR* C N+1) THENNEXT: GOTO 1000 
3920 G0T0382D 

5000 REM" - 

5001 REM" |PROGRAMME LISTEN! 

5002 REM" ^- 

5005 IFPO<2THENG0SUB700 

5006 IFDRTHENCL0SE1 
5008 PRINTCK* 

5010 SYSAU,12,4,BL*""FOGRAMME LISTEN" 
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5015 SYSAU,12,5,"' 


M, G* 


5020 SYSAU,10,7,"1. ALLE “ROGRAMME...” 
5030 SYSAU,10,9,"2. NUR *LLI ”\. ~FG..":R 
EM ALLGEM. PRG 

5040 SYSAU, 10,11, "3. NUR |-,L-*-"RG -" s 

REM HILFS-PRG 

5050 SYSAU, 10,13, "4. NUR *“h1_“."s 

REM SPIELE 

5060 SYSAU, 10,15, "5. NUR VL*~ I“/. 

REM SPRACHEN 

5070 SYSAU,11,17,"AUF "AN*S*AU*G*"RUC 

KERs ";:REM DRUCKER 

5080 IFDRTHENPRINT" "EL*"JA " 

5085 IFNOTDRTHENPRINT" "BL*"NEIN" 

5090 SYSAU,10,20,R*"<--| G*" ZUM "S 

*" \tNUE":REM <RETURN> , MENUE 
5100 GOSUB100: E*=A$ 

5110 IFE*= " 1" ORE*= " 2 " ORE*= " 3 " ORE*= " 4 " GRE 
*=CHR*(13)ORE*="D"QRE*="5"THEN5120 
5115 G0T05100 

IFE*=CHR* (13) THENDR=0s CLQSE1: GOTO 10 


5120 

00 

5130 

5140 

5150 


IFE*="D"THENDR=NOTDR:G0TÜ5000 
IFN0TDRTHEN5200 

CLOSE1: OPEN 1 ,4,1: PR I NT# 1 , CHE* (14); 
5160 PRINTttl," PROGRAMMLISTE COMMO 

DORE 64 

5170 CLOSEIsOPENl,4 
5180 PRINT#1," 

5190 CMD1 

5200 IFE'*="2"THENE*=" A" 

5205 R=0 

5210 I FE$= " 3 " THENE*-= " H " 

5220 IFE*= ,, 4 ,, THENE*="e" 

5230 IFE*="5"THENE*="S" 

5240 IFE*< > " 1" THEN5300 
5250 IFNOTDRTHEN5300 
5260 G0SUB5800 
5300 W=1:IFNOTDRTHENPRINTCG* 

5310 FORN=1TOPO—1 
5330 IFE*="1"THEN5370 

5340 IFE*< >LEFT*(WR*(N) , 1)THENNEXT;GOTG5 
450 
5370 
5380 


5950 IFNOTDRTHENIFW/23=INT(W/23)ANDNOTDR 
THENGOSUB100: PR I NTCG*; 

5965 IFNOTDRTHENPRINT 
5970 RETURN 

7000 REM" - 

7001 REM" !PROGRAMME LOESCHEN| 

7002 REM" 

7003 IFPO<2THENG0SUB700 

7004 PRINTCK* 

7005 SYSAU,11,7,BL*"PROGRAMME LOESCHEN" 

7008 SYSAU ,11,8,"--- 

-ILES UMBENENNEN-- 


G0SUB5900 

IFINT(W/2)=W/2ANDDRTHENPEINT 
5430 W=W+1 
5440 NEXT 

5450 IFW<>1THENGOSUB100 
5470 G0T05000 
5750 RETURN 

5800 L0=INT ( (PO-D/2) : IFINT (LO/2) =L0/2TH 
ENL0=L0+1 

5805 F0RT=1T0(PO—1)/2:N=T:W=N 

5810 B0SUB5900 

5815 N=N+LO:W=N 

5820 G0SUB5900 

5825 N=N—LO:W=N 

5835 NEXT 

5840 IFINT(PQ/2)=P0/2THENN=N+1:W=W+1:GOS 

UB5900 

5850 PRINT#! 

5860 DR=0:G0T05Ö00 

5900 Z*=LEFT* (WR* (N) , 1) 

5901 IFW<1OOTHENPRINT" 

5902 IFW<1OTHENPRINT" "; 

5905 W*=5TR* (W) ; PR I NTG*W* 

(WR*(N) ,LEN(WR* CN) )-l) ; 

5910 IFZ*="A"THENPRINTEL*"ALLG.-PRG. 


7010 SYRAIJ- 9.11.0*" 1 
.":REM FILES 

7020 SYSAU,9,13,"2. -ILES LOESCHEN_" 

7040 SYSAU, 11,16,R*"<_~! " G* " ZUM "S* 

" \ENUE "s REM <RETURN >,MENUE 
7050 GOSUB100:IFA* <>"1"ANDA$<>"2"ANDA*<> 
CHR*(13)THEN7050 
7060 IFft*=CHR*(13)THEN1000 
7070 U*="":N*= M " 

7080 A=VAL(fi$):0NAG0T07100,7500 
7100 G0SUB7400 

7110 PRINT:U*="":INPUTU*:IFU*-=""THEN7000 
7120 IFLEN(U*)>16THEN7100 
7125 F0RN=LEN(U*-)TQ17:U*=U*+" " : NEXT 
7130 G0SUB7400:SYSAU,14,1Q,5*U*E* 

7140 G0SUB7450 

7150 N*="":INPUTN*:IFN*=""THEN7000 
7160 IFLEN(N*)>16THEN7130 
7170 GQSUB7400:SYSAU,14,10,S*-U*:GGSUB745 
O: SYSAU, 14,14,S*N* 

7180 SYSAU,1,18,R*" OK ?" 

7190 FORN=LEN(N*)TOI7:N*=N*+" ":NEXT 
7200 ;GOSUBI00;IFA*<>"J"ANDA*<>"N"THEN72 
00 

G4SR ortunl^ 10 I FA*= " N " THEN7100 
7220 FORN=1TOPQ-1 

7230 IFU*=RIGHT*(WR*(N5,LEN(WR*(N))-l)TH 
ENWR*(N5=LEFT*(WR*CN),1)+N*:G0T07000 
7240 NEXT 

7250 PRINT: PRINT: PRINT" "!_!*" NICHT GESPE 
ICHERT !" 

7260 FORN=1T04000:NEXT 
7270 60T07000 

7400 REM" - 

7401 REM" !FILES UMBENENNEN' 

7402 REM" -/ 

7405 PRINTCG* 


7410 SYSAU,12,5,BL*"FILES UMBENENNENs" 
7420 SYSAU,8,9,G$"2U LQESCHENIDES PROBRAM 

M: " 

RETURN 

SYSAU,8,13,G*"NEUER NAME DES PRQGRA 


7430 

7450 

MMS; 

7460 

7500 

7501 

7502 


FILES LOESCHEN 


)"TAB(3)RIGHT* 


5920 IFZ*="G"THENPRINTWW*"SPIEL 


5930 IFZ*="H"THENPRINTR*"HILFS-PRG. 


5940 IFZ*="S"THENPRINTS*"SPRACH—PRG. 


RETURN 
REM" 

REM" 

REM" - 

7510 PRINTCG* 

7520 G0SUB7B0Ö 

7530 N*="":INPUTN*:IFN*=""THEN7Ö00 
7540 IFLEN(N*)>16THEN7500 
7550 PRINTCG* 

7554 GOSUB7BOO:SYSAU,13,14,S*N* 

7556 SYSAU ,2,18,R*" OK ?" 

7560 GOSUB100:IFA*<>"J"ANDA*<>"N"THEN756 
0 

7570 IFA*="N"THEN7500 

7575 F0RN=LEN(N*)T017:N*=N*+" " : NEXT 
7580 F0RN=1T0P0—1:IFRIGHT*(WR*(N),LEN(WR 
*(N))-!)<>N*THENNEXTN:G0T07600 
7590 F0RT=NT0P0-1:WR*(T)=WR*(T+l):NEXT:P 
0=P0-1:B0TG7000 
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7600 PRINT:PRINT:PRINT" "N$" NICHT GESPE 
ICHERT !" 

7700 F0RN=1T04000:NEXT:G0T07000 

7750 SYSAU,10,21,R*U$" NICHT GESPEICHERT 

i ii 

7760 FQRN=1TG4000:NEXT:G0T07000 
7800 SYSAU,13,8,BL$"FILE5 LOESCHEN" 

7810 SYSAU, 13,9 , "—--- 

7820 SYSAU,O,12,G*"WELCHES PROGRAMM SOLL 
GELOESCHT WERDEN ?"Sf:PRINT 
7830 RETURN 

10000 REM" /- 

10001 REM" |INITIALISIERUNG! 

10002 REM" 

10010 MB$="L£3 HTROGRAMM XERWAL 

TUNG 

10020 MB$=MB$+" — — —— 

II • 

10030 MB*=MB$+"Eg S!Y\ICHAEL |0 

ERNER 6719 OEISENHEIM/(ERG 
10040 REM"lu"=SHIFT+CLR-HOME; "ES"=CRSR-DO 
WN; "S"=CTRL+7; "1"=CTRL+1; ”&"=CTRL+3 
10050 DIMC*(70):DIMP*(70):CC*=CHR*(34):R 
EM VARIABLEN FUER INHALTSVERZEICHNIS 
10060 DIMWR*(500):REM PROGRAMM-FIL 

E $ 


10070 CG$="L"+CHR$ (142) : REM CLEAR-GROSS 
10080 CK$="L"+CHR$(14):REM CLEAR-KLEIN 


ROT$ 

GELB* 

BLAU* 

SCHWARZE 

WEISS* 

INVERS AN* 
INVERS AUS* 
HINTERGRÜNDE 


10090 R*=CHR*(2B):REM 
10100 G*=CHR*(158):REM 
10110 BL*=CHR*(31>:REM 
10120 S*==CHR*(144):REM 
10130 WW*=CHR*(5> : REM 
10140 AN*=CHR*(18):REM 
10150 AU*=CHR*(146):REM 
10160 P0KE53281,12:REM 
ARBE=GRAU 2 
10170 PGKE53280,11:REM 
=GRAU 1 

10180 P0KE650,128:REM 
UF ALLEN TASTEN 
10190 AU=49152:REM 
FUER HILFSROUTINE 

10200 F0RN=AUT0AU+25:REM HILFSROUTINE 
10210 READWE:FOKEN,WE:NEXT 
10220 DATA32,253,174,32,158,183,138 
10230 DATA72,32,253,174,32,158,183 
10240 DATA104,168,24,32,240,255,32 
10250 DATA253,174,76,164,170 

11111 G0T02000 , , 

pr» nv Listmg Softwarekatalog 

KtHUY. (Schluß) 


RAHMENFARBE 


AUTOREPEAT A 


STARTARESSE 


mmsämm leserservice: mmzmW* 

Die Alternative zum mühsamen Abtippen 


Alle Listings, die im 64’er-Magazin veröffentlicht werden, gibt es künftig auch auf 
Datenträgern. Zusätzlich bieten wir auch Autoren besonders langer Basic- 
oder Maschinenprogramme eine neue Möglichkeit an, ihre Arbeiten zu veröffentlichen. 
Solche Programme werden künftig ebenfalls über den Leserservice angeboten. 


Viele Leser haben uns ge¬ 
fragt, ob die veröffentlichten 
Listings auch auf Datenträ¬ 
gern angeboten werden. Mit 
dem Leserservice kommen 
wir diesem Wunsch nach. Es 
werden, nach VC 20 und C 64 
getrennt, jeweils alle in einer 
64’er-Ausgabe enthaltenen 
Listings auf Kassette angebo¬ 
ten. 

Eine Diskettenversion die¬ 
ser Programme ist in Vorbe¬ 
reitung und wird in einer der 
nächsten Ausgaben angebo¬ 
ten. Mit Erscheinen dieses 
Heftes sind die Kassetten mit 
den Programmen der Aus¬ 
gaben 4 und 5 des 64’er- 
Magazins verfügbar. Diese 
Kassetten können mit der 
beigehefteten »Buchladen- 
Software-Bestellkarte unter 


folgenden Nummern bestellt 
werden. 

Ausgabe 4, 

C 64-Programme: CB 007 
Ausgabe 4, 

VC 20-Programme: VC 006 
Ausgabe 5, 

C 64-Programme: CB 008 
Ausgabe 5, 

CV 20-Programme: VC 007 
Diese Kassetten kosten pro 
Stück 29,90 Mark. Kassetten 
mit den Listings der Ausga¬ 
ben 6 und 7 werden ab Er¬ 
scheinen von Heft 8 angebo¬ 
ten. 


Der Extra-Service 


Oft erreichen die Redak¬ 
tion interessante Program¬ 
me, die leider zu lang sind, 
um sie im Heft als Listing zu 


veröffenüichen. Oder sie 
sind in Assembler geschrie¬ 
ben. Viele dieser Program¬ 
me brauchen den Vergleich 
mit teuren kommerziellen 
Produkten nicht zu scheuen. 

Solche Programme veröf¬ 
fentlichen wir zusätzlich zu 
unserem bisherigen Listing- 
angebot in einer neuen 
Form: Sie werden im Heft 
vorgestellt. Darin finden Sie 
die Programmbeschrei¬ 
bung, die Bedienungsanlei¬ 
tung, kurz alles, was Sie für 
eine komplette Dokumenta¬ 
tion benötigen. Das Pro¬ 
gramm selbst wird auf Kas¬ 
sette angeboten. Auch für 
diesen Service sind die Dis¬ 
kettenversionen in Vorberei¬ 
tung. Auf den folgenden 
Leserservice-Seiten finden 
Sie die ersten drei Program¬ 


me: ein Lernprogramm für 
russische Vokabeln, eine Su¬ 
perversion des Spiels »Spa¬ 
ce Invaders« und ein Pro¬ 
gramm, das einen Geldspie¬ 
lautomaten simuliert und 
über ausgezeichnete Grafik 
verfügt. 

Auch diese Programme 
sind über die »Buchladen- 
Software-Bestellkarte« er¬ 
hältlich. Die Bestellnummer 
ist jeweils am Ende der Do¬ 
kumentation aufgeführt. Der 
Preis für diese Programme 
beträgt 29,90 Mark. 

Die Preise für die 
Leserservice-Kassetten und 
-Disketten müssen die Ko¬ 
sten decken — wir sind aber 
bemüht, sie so niedrig zu hal¬ 
ten, daß der Leserservice 
auch wirklich ein Service ist. 

Ihre 64’er-Redaktion 
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Leserservice 



Russische Vokabeln - 


das Lemprogramm mit 
den zwei Zeichensätzen 


Beim Erlernen einer Fremdsprache ist das Lernen von Vokabeln, Redewendungen 
und Satzkonstruktionen eine ziemlich unangenehme Aufgabe. 


E in Computer mit einem Vo¬ 
kabellernprogramm kann 
einem das Lernen selbst 
nicht abnehmen. Er kann 
aber ohne große Mühe ein 
»elektronisches« Vokabel¬ 
heft führen, verwalten, aus- 
drucken, zum Abfragen ver¬ 
wenden, das Lernen durch 
gezieltes Wiederholen noch 
nicht beherrschter Wortpaa- 
rungen verbessern helfen 
und das Lernen durch den 
Umgang mit dem Computer 
interessanter erscheinen 
lassen. 

Viele Vokabellernpro¬ 
gramme wurden schon ver¬ 
öffentlicht. Das im folgenden 
vorgestellte Programm für 
den Commodore 64 zum Ler¬ 
nen russischer Vokabeln hat 
jedoch die folgenden her¬ 
ausstechenden Merkmale: 

1. Erweiterung des Zeichen¬ 
satzes auf Bildschirm und 
Drucker, um die kyrillischen 
Buchstaben darstellen zu 
können 

2. ein hoher Bedienungs¬ 
komfort, denn Auswahl, Ein¬ 
gabe, Abfragen und so wei 

ter erfolgen menü- bezie¬ 
hungsweise maskengesteu¬ 
ert. 

Für diejenigen, die an der 
russischen Sprache nicht in¬ 
teressiert sind, kann das Pro¬ 
gramm vielleicht als Anre¬ 
gung dienen, denn viele 
Sprachen haben ja in ihrer 
Schrift Buchstaben, die nicht 
im normalen Zeichensatz 
der Computer enthalten sind 
(zum Beispiel Griechisch, 
Französisch). 

Das Programm »Russische 
Vokabeln« kann maximal 
fünfzig Vokabeln im Spei¬ 
cher des Computers aufneh¬ 
men und .zum Abfragen, 
Drucken, Ändern und so 
weiter verwenden. Eine Vo¬ 
kabel besteht aus fünf 
Blöcken: 


— Russisches Wort, even¬ 
tuell mit grammatikalischen 
Erläuterungen, 

— deutsche Übersetzung 
(en), 

— Bemerkungen, 

— ein oder mehrere russi¬ 
sche Satzbeispiele und 

— die deutsche Übersetzung 
der Satzbeispiele. 

Jeder der fünf Blöcke kann 
maximal drei Zeilen mit ma¬ 
ximal 39 Zeichen fassen. Die 
Mindesteingabe ist eine rus¬ 
sische Vokabel mit deut¬ 
scher Übersetzung. Da das 
Lernen von »nackten« Wort¬ 
paaren später oft zu einer 
fehlerhaften Anwendung 
des Wortes im Satz führt, ist 
es zweckmäßig, auch ein 
kleines Satzbeispiel mit 
Übersetzung zu lernen. Dies 
ist mit def' in diesem Pro¬ 
gramm vorhandenen Voka¬ 
belstruktur möglich, Der 
Block »Bemerkungen« kann 
beliebige Informationen ent¬ 
halten. Sie werden beim Ab¬ 
fragen der Vokabeln immer 
angezeigt, ganz egal in wel¬ 
cher Richtung abgefragt 
wird. Man kann hier zum Bei¬ 
spiel die Wortart eingeben. 

Die maximal 50 Vokabeln 
im Speicher des Computers 
können auf einer Diskette un¬ 
ter einer Nummer (zwischen 
0 und 999) abgespeichert 
werden. Die Abspeicherung 
erfolgt als sequentielle Datei 
mit dem Namen »RUSS.VOK. 
nnn« mit nnn als Dateinum¬ 
mer am Ende der Eingabe 
beziehungsweise Änderung 
von Vokabeln. 

Das Programm läuft unter 
Simons Basic und folgender 
Hardware-Konfiguration: 
Commodore-64, Floppy 1541 
und Drucker 1525 oder Sei- 
kosha GP-100 VC. 

Nach dem Laden und Star¬ 
ten von Simons Basic kann 
das Programm geladen und 


Textfelder: 

C$(0:255) 

LN$(0:8) 
Z$(0:2,0:4,0:MM) 


Druckzeichentabelle 
Speicher für Druckerausgabe 
interner Vokabelspeicher 


S* Feld >“ h "■ v " 

Schalter: ob Vokabel aktiv (0=nein, 


L%(0:MM) 

Y%(0:39) 


Textvariablen: 

Ä$ 

B$ 


BL$ 

CL$ 

CS$ 

DN$ 

DS$ 

EM$ 

QU$ 

Rl$ 

R2$ 

TR$ 

X$ 


gerade bearbeitete Zeile als ASCII- 
Array 

Antwort, Hilfszeichenkette, Dateiname 
bei Löschen 

Antwort, Hilfszeichenkette 
40 Leerzeichen 
1 Leerzeichen 
Bildschirm löschen 
Cursor 

Dateiname RUSS.VOK.xxx 

Dateiname auf Datei 
Fehlermeldung von Floppy 

Anführungszeichen 

RVSON 

Steile im Ausdruck zwischen Vo- 

kabeln 
aktuelle Zeile 


Numerische V “ irf,1 “^ ahlcode Hauptmenü, ASCII-Code 


B 

EN 

I 

IB 


IS 

IV 

IY 

IZ 

J 

K 

MM 

NN 

ST 

W 

ZE 


A$ 

Schalter Abfragerichtung 1=R-D, 

Fehlernummer Floppy, Fehlerschalter 
Laufvariable, Hilfsvanable 
lfd Block: 0=Russisch, 1-Deutsch, 

2 = Bemerkung, 3 =Beispiel Russisch, 

4 = Beispiel Deutsch 
lfd. Spalte innerhalb der Eingabezelle 

(0-39) 

lfd. Vokabel (0..MM) 

lfd. Bildschirmzeile 

lfd. Zeile innerhalb Block (0..2) 
Laufvariable, Hilfsvariable 
Laufvariable, Hilfsvariable 
max. Anzahl Vokabeln minus 1 (Dirnen 

Anzahl noch nicht gewußte/geprüfte 

Vokabeln 

Status externer Einheiten 

nächste Vokabel im Bereich (0..(NN i)) 

lfd Zeilennummer im Vokabelausdruck 

Variablen im Programm »RUSSVOK« 
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Hauptprogramm-Teile: 

10 - 309 v- . 

von ROM ia^M du hU ?H ZeiChensatees 

Chen für die Bildschirm/ • Schrift2ei - 
»DESIGN« und , _ hirmanzei 9e durch 
den Drucker ipfr X f XX<< und ** 
tion im Grafik-Modi ichend efini- 
Initialisierung FeldC $(0:255)) 

Anzeia** Z * Pr °grammtitelbild 
der AuswaW ÄUSWahlme ^s, Eingabe 

wünschten ÄM on 6I3etl 2ur 3e ‘ 
Löschen einer Vokabeldatei CAuswah] 

«>ft»gen TO „v OIal)eIntAuswalüu 

Ausdrucken 6i „ srVokabeWat ei (Äi]s - 

Unterprogramme: 

10010 - 10990 D _ f • 

SM 6 “ 98 V0kabel -E» 3 abe-/ A bfa ge . 

VtS‘b a effj SketteSpei0heri > 

»iv, imVotabeMc komplett 

ÄSSiSSS Sei,e 70,1 

Leerzeilen mfugen von acht ^ 

Beschreibung wichtiger Programmzeilen und Unterprogramme 
im Programm »RUSSVOK« 

Buchstabe 


410- 472 
479 - 630 

640- 730 


805- 844 
905 - 1140 

1906 -2111 
2906 - 3030 


11010 - 11099 

12020 - 12110 
13000 - 13020 

14000 

15000 - 15005 


Buchstabe 

fl 

8 

B 


Taste < Ti) 


Tastern) 


fl 


Shift B 


% 



n 


B 

T 

T 

Shift ö 

V 

V 

Shift B 

4* 

Shift F 

E 

X 

X 

Shift 0 

U. 

Shift Z 

Shift S 

fl 

Shift T 

3 (drei) 

Ul 

Shift @ 

Shift I 

Ul 

Shift # 

Shift J 

V 

Shift H 

K 

bl 

Shift V 

Shift L 

b 

Shift W 

M 

3 

Shift E 

H 

KJ 

Shift U 

Q 

fl 

Shift fl 

Shift P 

n Alphabets und der Tastenbelegung auf dem Commodore 64 


gestartet werden. Durch 
Drücken irgendeiner Taste 
gelangt man in das Auswahl¬ 
menü. Nach Eingabe des 
Auswahlcodes (1 bis 8, eine 
detaillierte Beschreibung 
erfolgt später) und Drücken 
von »RETURN« wird, falls be¬ 
reits Vokabeln im Speicher 
; des Computers sind, ge¬ 
fragt: »DATEI nnn IM SPEI¬ 
CHER, NEU (J/N) ?«.. Wenn 
man die vorhandenen Voka¬ 
beln verwenden will, gibt 
man »N«, sonst »J«, gefolgt von 
»RETURN«, ein. Wenn noch 
keine Vokabeln geladen 
oder eingegeben wurden 
oder wenn man eine andere 
Vokabeldatei laden will (Ant¬ 
wort »J«), wird nach der 
Datei-Nummer (0 bis 999) ge¬ 
fragt. Nach der Eingabe der 
Nummer und »RETURN« 
wird die Datei (wenn sie auf 
der Diskette vorhanden ist) 
in den Speicher geladen. 
Vorsicht! Wenn keine Datei 
mit der eingegebenen Num¬ 
mer vorhanden ist, wird der 
Vokabelspeicher im C ompu- 
ter gelöscht. 

Die folgenden Funktionen 
können im Auswahlmenü ge¬ 
wählt we v ^:n: 

Abfragen von Vokabeln 

Folgende Möglichkeiten 
gibt es: Abfragen Russisch- 
Deutsch, Abfragen Deutsch- 
Russisch und Abfragen mit 
zufälliger Abfragerichtung. 
Das zu übersetzende Wort 
und das Beispiel werden an¬ 
gezeigt, wobei in den 
Blöcken der Zielsprache 
Fragezeichen erscheinen. 
Die Bemerkungen werden 
immer angezeigt. Man über¬ 
setzt nun die angezeigte Vo¬ 
kabel und das Beispiel (im 
Geist oder auf einem Stück 
Papier) und drückt dann ir¬ 
gendeine Taste. Daraufhin 
wird die gesamte Vokabel 
angezeigt. Man muß nun sei¬ 
ne Übersetzung mit der an¬ 
gezeigten vergleichen und 
entscheiden, ob die Vokabel 
gewußt (Eingabe »R«) oder 
nicht gewußt (»F«) wurde. Au¬ 
ßerdem ist das Beenden des 
Abfragens durch die Einga¬ 
be »E« möglich. Das Abfra¬ 
gen geht zufallsmäßig so lan¬ 
ge weiter, bis alle Vokabeln 
»sitzen«. 

Ausdruck der Vokabeln (4) 

Der gesamte Vokabelbe¬ 
stand im Speicher wird aus¬ 
gedruckt (links Russisch, 
rechts Deutsch, sowie die mit 
Stern markierten Bemerkun¬ 


gen). Der Ausdruck ist auf 
72zeiliges Papier abge¬ 
stimmt. 

Eingabe, Ändern, Ergänzen, Spei¬ 
chern, Ansehen von Vokabeln (5) 

Zu Beginn wird die erste 
Vokabel angezeigt und steht 
zur Änderung oder Eingabe 
zur Verfügung. Die folgen¬ 
den Tasten dienen zum Posi¬ 
tionieren des Cursors bezie¬ 
hungsweise zum Blättern in¬ 
nerhalb des Vokabelspei- 
chers: 

- RETURN/SHIFT-RETURN: 
Zeilenwechsel vorwärts und 
rückwärts innerhalb eines 
Blocks. 

- fl/f2 (= Shift-fl): Wechsel 
in den nächsten oder vorher¬ 
igen Block (also zum Beispiel 
Wechsel von Russisch nach 
Deutsch und so weiter). 

- f3/f4 (= Shift-f3): Vokabel¬ 
wechsel, vorwärts oder 
rückwärts. 

- f5/fö (= Shift-fS): Vokabel¬ 
wechsel, je fünf Vokabeln 
vorwärts oder rückwärts. 

Wenn sich in einer Zeile 
bereits Text befindet, steht 
der Cursor immer am Ende 
des Textes. Durch Drücken 
von »DEL« kann man Text lö¬ 
schen. Die deutsche Einga¬ 
be erfolgt wie gewohnt (nur 
Großbuchstaben): die russi¬ 
sche Eingabe erfolgt gemäß 
der beigefügten Tabelle (die 
auf der Tastatur fehlenden 
kyrillischen Zeichen sind 
über Shift-Taste einzugeben). 

Nach dem Eingeben be¬ 
ziehungsweise Ändern 
drückt man zum Abspei¬ 
chern der Vokabeln auf Dis¬ 
kette die Taste »f7«. Eine 
eventuell vorhandene Voka- 
beldatei mit derselben Num¬ 
mer wird dabei überschrie¬ 
ben. Soll keine Abspeiche¬ 
rung erfolgen, so kommt man 
durch »f8(= Shift-f7> wieder 
in das Auswahlmenü. 

Löschen einer Vokabeldatei (6) 

Mit dieser Option kann 
man eine Vökabeldatei von 
der Diskette entfernen. 

Liste der Vokabeldateien 
anzeigen (7) 

Es wird eine Liste aller Da¬ 
teien auf der Diskette ange¬ 
zeigt, die »RUSS.VOK.nnn« 
heißen. 

Programmende (8) 

Diese Option schließlich 
beendet das Vökabellern- 
programm »RUSSVOK — 
Russische Vokabeln«. 

(Hans Peter Postei) 

Dieses Programm ist auf Kassette im Rah¬ 
men des Leserservice (s.S.78) unter der Be¬ 
stellnummer CB 011 erhältlich. 
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Leserservice 



[ 30 ^ 

ilO-280 

340 

350-470 
510-540 
350-590 
610-690 
[00-730 
750-780 
[90-880 


Erstelle« ^^clunetMOUtlW Werte 

Einlesen der“ ibe i*>lge:n ® ^ Mitt e 
Einlesen d ® ung bei Kr° und des Starte! 
Ge vrit»ttW® GeW i«nswte.a Mitte 

ÄriaWen testen 


JOO-990 


1020-1130 

1150 

1170 


[180-1450 
1460-1510 
1520-1700 
[720-1840 
1850-1980 
1990-2080 
2200-2350 
2420-2430 
1440-2550 


1560-2820 

2830-3710 

3720-4140 


»tr esGe ^ a ai-l^n 

^Uetdoppeltoder^ 

-^Ä ta en^ WeIte 

p ar ben für G&w te n Scheib® 

sss-snsss“ e 

fÄ’f-d Anseiden desKs 

^jeSendetinieten 

Neue ^ s 

Restliche DA __ 


CROU 


Restlichem __ 


C 64 als Spiefai 


Dieses Programm 
wurde für 
alle diejenigen 
geschrieben, die 
sich auch einmal 
an einem Geld¬ 
spielautomaten 
versuchen wollen, 
ohne großes Kapital 
zu investieren. 

C rown No. I simuliert den 
gleichnamigen Automa¬ 
ten in den Gasthäusern und 
Spielhallen. Durch Sprites 
und selbstdefinierte Zeichen 
wurde eine entsprechende 
Grafik erzielt. 

Wichtig!! Vor dem Einla¬ 
den muß der Speicher hoch- 
gePOKEd werden: 

POKE 44,64 : POKE 16384,0 : 
NEW 

Technische Daten: 

Das Programm selber 
benötigt 15068 Byte im 
Speicher 

Die Dimensionierungen 
verbrauchten 811 Byte 
Crown No. 1 enthält 5 Spri¬ 
tes 

80 


Die Maschinenroutine 
liegt bei Adresse 49152 
Es wurden 79 Zeichen 
umdefiniert. 


der *?Mwinn gleich dem an¬ 
gegebenen Wert. Die Krone 
im mittleren Fenster gilt als 
Joker für jeden Betrag. Eine 
Krone allein gewinnt 30 Pfen¬ 


Scheiben gestoppt werden. 
Kapital und Sonderspiele 
werden in den oberen Fen¬ 
stern angezeigt. (C. Vigelius) 
Bestellnummer CB009 


Spielanleitung 


Crown No. 1 fragt Sie nach 
dem Start, wieviel Kapital Sie 
investieren möchten. Sie 
können bis zu 30 Mark er¬ 
setzen. Danach müssen sie 
eine Weile warten, die Zei¬ 
chen werden umdefiniert. 

Sinn des Spiels ist es, drei 
gleiche Symbole in den fünf 
Fenstern zu bekommen. Ist 
dies erreicht, so gibt es meh¬ 
rere Möglichkeiten. Drei 
Kronen ergeben Sonder¬ 
spiele. Bei Sonderspielen 
wird jeder Gewinn auf drei 
Mark erhöht, jedes goldene 
Feld in der Mitte wird als Ge¬ 
winn (drei Mark) gewertet. 
Die Anzahl der Sonderspiele 
wird durch Drücken einer 
Taste bei laufender Auswahl 
bestimmt. Alles wird optisch 
dargestellt. Bei leuchten¬ 
dem Starter kann die Aus¬ 
wahl während einer be¬ 
stimmten Zeit nachgestartet 
werden. Der Starter erlischt 
dann. Wenn dreimal der 
gleiche Geldbetrag in den 
Fenstern erscheint, dann ist 



nig. Jeder Gewinn kann 
durch Drücken der Risikota¬ 
ste (eine beliebige Taste) 
verdoppelt oder genullt wer¬ 
den. Dies wird optisch an 
den äußeren beiden Leitern 
dargestellt. 

Zwei gleiche Wappen er¬ 
höhen die dazugehörige Ge¬ 
winnstufe um eins. Es kön¬ 
nen bei jeder Risikoleiter 
höchstfalls zwei Gewinnstu¬ 
fen Zustandekommen. Eine 
Gewinnstufe verdoppelt ei¬ 
nen Gewinn auf der Risiko¬ 
leiter automatisch. Bei drei 
gleichen Wappen wird der 
Starter eingeschaltet. Sie 
können die erste Scheibe 
nachstarten, wenn das Wort 
»Start« leuchtet. Bei leuchten¬ 
dem »Stop« können alle 


Das Programm 
ist so konstruiert, 
daß selbst ein 
unerfahrener 
Computerbesitzer 
Variationen des 
Spielablaufs durch 
einfaches Ändern 
der Variablen 
vornehmen kann. 


D 


iese Space-Invader- 
Version ist den gleichna¬ 
migen Telespielen nach¬ 
empfunden. und zeichnet 
sich durch die Möglichkeit, 
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ssSSfiSs** 

^»eSfarter 
Jj® 6 ^'tfJeres Po 

^ ertl inkesnl enster 

S ett,iak ^mZ esF ^ 
S eich V2/VlrZl SFenste r 

J^a^^P ensfer 


ablauf kann man ohne weite¬ 
res vornehmen. Zu diesem 
Zweck unterbricht man das 
Programm und stellt dann 
die Variablen entsprechend 
ein. Das Programm wird 
dann durch »GOTO 10« fort¬ 
gesetzt. 

Bei Unterbrechung mit der 
»RUNSTOP/RESTORE«-Ta- 
ste kann man den Zeichen¬ 
generator mit »POKE 53272, 
29« wieder einschalten. 

Nachdem das Einladen 
beendet ist, erfolgt ein Rück¬ 
sprung aus dem Unterpro¬ 
gramm und die Register wer¬ 
den gestellt. 

In Zeile 80 erfolgt der Auf¬ 
ruf des Maschinen-Program- 
mes und die Auswertung. 
Sind alle Alien der ersten Zo¬ 
ne vernichtet, so kommt man 
in die zweite Hälfte des Ba- 
sic-Programmes, die im Prin- 


Vari ^i e ,c,o m 


No. u 


leicht anpaßbar zu sein, aus. 

Außerdem sind natürlich 
jede Menge Extras, zum Bei¬ 
spiel sichtbeeinflussende 
Wolken, ein intelligenter Au¬ 
ßerirdischer und ein UFO, 
das Alien aussetzt, vorhan¬ 
den. 

Nach dem Kampf erwartet 
der Spieler dann eine 


W6R 


Highscore-Tabelle. Das Pro¬ 
gramm läuft auf dem Com- 
modore 64. 

Nachdem das Programm 
mit »RUN« gestartet wurde, 
springt der Basic-Interpreter 
nach Zeile 250, wo er die Ma¬ 
schinenprogramme einliest, 
und den Zeichengenerator 
in das Basic-RAM verlegt. 
Hierzu muß gesagt werden, 
daß man nach dem ersten 
»RUN« keine Veränderungen 


SYS 30000 

Eventuell Invaders bewegen, Joy¬ 
stickabfrage und so weiter. Kommt 
zurück, wenn entweder keine Inva¬ 
ders mehr vorhanden sind oder wenn 
die Basis vernichtet ist. 

SYS 29995 

Wie oben, jedoch ohne Initialisie¬ 
rung am Anfang (kein Reset des 
Punktstandes etc.) 

SYS 31000 

Farbe setzen. 

Obere Hälfte Türkis, untere Hälfe Rot. 

SYS 33131 

Aufruf der Highscore-Tabelle 

SYS 33024, S, Z, A$ 

Druckt A$ ab Spalte S der Zeile Z aus 

SYS 33050, X, Z, C 

Zieht auf dem Bildschirm eine vertika¬ 
le Linie über die Position X mit dem 
Zeichen Z und der Farbe C. 


am Basic-Programm mehr 
vornehmen sollte. 

Der Interpreter würde die 
Programmzeilen neu ordnen 
und dabei den Zeichenge¬ 
nerator durcheinanderbrin¬ 
gen. Änderungen am Spiel- 


zip der ersten Hälfte ent¬ 
spricht. 

Das Programm ist auf den 
Joystick an Port 1 abge¬ 
stimmt, kann aber auch über 
»CONTROL«, »2« und »SPA¬ 
CE« gesteuert werden. Dies 
trifft übrigens für alle Spiele 
mit Joystick an Port 1 zu. 

(Günther Knöpfle) 
Bestellnummer CB010 


Register: 

Variable: 

20182 

NA : Nachladegeschwindigkeit der Basis 

20183 

MO : Wenn 0, dann keine Unterbrechung 
am Bildschirmrand 

20184 

AB : Wenn 1, dann Explosion der Invaders 
bei Abwehrberührung 

20185 

FI: Feuergeschwindigkeit der Invaders 

20186 

IN : Geschwindigkeit der Invaders 

20187 

ET : Feuergeschwindigkeit des unteren 

Alien 

20188 

DE : Verzögerung, nur in Verbindung mit 
»VE« wirksam (DE*VE) 

20189 

VE : Wenn 0, dann ausgeschaltet 
(Beschreibung siehe »DE«) 

52802 

Wenn 0, dann Wölke 1 eingeschaltet 

52804 

Wenn 0, dann Wolke 2 eingeschaltet 

52806 

Wenn 0, dann Ufo ausgeschaltet 

ZB : Punktestand 

ZH : Anzahl zerstörter Sektoren 

ZR: Hilfszeiger für steigenden Schwierig¬ 
keitsgrad 

M, J, I, G, T : FOR.. .NEXT-Variablen 

A, B : Für Auslesen der DATÄS 

A$ : Eingabe, Auswertung 

SU: Prüfsumme 

Ml, M2 : Zeilenzeiger für falsche DATAS 

Bei Geschwindigkeiten: Je kleiner der Wert, desto größer 

die Geschwindigkeit 


Die wichtigsten Sys-Aufrufe 


Variablenliste von »Space Invaders« 
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Anwendung des Monats 


C 64 




Klaus Michael 
gönnt seinem C 64 
keinen Urlaub 


D ie Idee war, mit einer klei¬ 
nen Tauchpumpe (Cam¬ 
pingartikelbedarf) und ei¬ 
nem verzweigten Schlauch¬ 
system die Blumen täglich 
mit dem kostbaren Naß zu 
versorgen (Bild 1). Diese 
kleinen Pumpen haben eine 
Förderleistung von etwa 14 


User Port 


Pin 

Signal 

Bemerkung 

1 

GND 


2 

+ 5V 

MAX. 100 mA 

3 

RESET 


4 

CNT1 


5 

SP1 


6 

CNT2 


7 

SP2 


8 

PC 2 


9 

SER. ATN IN 


10 

9 VAC 

MAX. 100 mA 

11 

9 VAC 

MAX. 100 mA 

12 

GND 


A 

GND 


8 

FLAG2 


C 

PBO 


D 

PB1 


E 

PB2 


F 

PB3 


H 

PB4 


J 

PB5 


K 

PB6 


L 

PB7 


M 

PA2 


N 

GND 



sicher auch das leidige 
Problem: Der Uriaub steht vor 
der Tür und keiner der 
Nachbarn will die Blumen ver¬ 
sorgen, da sie just in 
der gleichen Zeit Urlaubsge¬ 
fühle verspüren. 

Der Computer 
schafft 
Abhilfe. 


Bild 2. Pinbelegung 
des User-Ports. 
Benötigt wurden nur 
die Anschlüsse 2. 

A und C. 


Bild 4. Dieser 
Stecker ist im Elektronik 
fachversand oder 
-handel erhältlich. 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 


REM ***** UHR STELLEN ***** 

C-56328:: REM BASISADRESSE DER UHR IN CIA 
POKEG+7,PEEK(C+7)AND 127 
POKEC+6 , PEEK (06) ÜR 128 

INPUT " ZEIT IM FORMAT HI-IMMSS EINGEBEN " ; A* 
IF LEN(A*><>6 TUEN 140 
H : ~V AL (LEFT* (A* ,, 2 ) ) 

M«VAL<MID*(A*,3,2>) 

S-VAL(RIGHT*<A*,2>) 

IF H>23 THEN 140 

IF H> 1 :L THEN H=H+68 

POKEC+3,16*INT(H/10)+H-INT(H/10)*10 


Das Listing 

zu Blumengießen 
(Fortsetzung Seite 84) 
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Tauchpumpe und dazu Campingartikel 
passende Schläuche 


Stecker zum Anschluß Cardcon-Stecker der Firma TRW 
an den User-Port (Nr. 251-12-50-170) 


elektronische Bauteile: 
IC 
RI 
TI 
Dl 
Rel 
CI 

Gleichrichter 


6fach-Inverter ITT 7404 
Widerstand 1 kOhm 
Transistor BC 337 
Diode IN 4001 
Relais 12 V 

Kondensator 470 mikro Farad 
8027 


Kosten: 

Tauchpumpe und Schläuche zirka 20 Mark 

Interface und Stecker zirka 50 Mark 


1/min., was für die minimalen 
Ein- und Ausschaltzeiten me¬ 
chanischer Schaltuhren von 
30 Minuten viel zu viel ist. 
Elektronische Schaltuhren, 
die individuelle Schaltzy¬ 
klen zulassen, waren wie¬ 
derum viel zu teuer. 

Die Idee, meinen 64er zum 
Blumengießen herzuneh¬ 
men, reifte. Denn schließlich 
besitzt er einen User-Port, 
der für solche Aufgaben wie 
geschaffen ist. 

Der User-Port, 
eine Verbindung 
zur Außenwelt 

Der User-Port ist eine 
Schnittstelle, mit der der An¬ 
wender auf einfache Art und 
Weise Kontakt zwischen dem 
Commodore und der Außen¬ 
welt hersteilen kann. Mit ihm 
ist es unter anderem mög¬ 
lich, Geräte an- und auszu¬ 
schalten. Da der User-Port 
eine 8 Bit breite Datenleitung 
besitzt (PB0-PB7, siehe Bild 
2), können ohne weiteres 
Klimmzüge bis zu 8 Verbrau¬ 
cher geschaltet werden. Da¬ 
zu ist jedoch etwas zusätzli¬ 
che Hardware nötig. Um ei¬ 
nen Stromverbraucher zu 
steuern (in unserem Fall eine 
kleine Pumpe), benötigt man 
ein Schaltinterface. Denn die 
Pumpe braucht mehr Strom 
als der User-Port zur Verfü¬ 
gung stellt. In meinem Fall 
baute ich mir ein Interface, 
das direkt an das normale 
220-Völt-Netz angeschlossen 
werden kann. Mit ihm lassen 
sich grundsätzlich alle Elek¬ 
trogeräte schalten. Den Auf¬ 
bau dieses einfachen Schalt¬ 
interfaces zeigt Bild 3. Zu¬ 
sätzlich benötigt man noch 
eine Verbindung vom Inter¬ 
face zum User-Port. Ein ge¬ 
eigneter Stecker zum An¬ 
schluß an den User-Port ist 
der Cardcon-Stecker von 
TRW (Nr. 251-12-50-170) (Bild 
4). 

Zur Absicherung des 
User-Ports wurde zwischen 
der eigentlichen Schaltung 
und dem Port ein 6fach- 
Inverter eingefügt. 


Bild 1. Das 

Interface steht links neben dem 
Commodore. Die Pumpe liegt im Eimer, 
der mit Wasser gefüllt ist. 

Durch die unterschiedlichen Schlauch¬ 
durchmesser kann jede Blume 
individuell mit der für sie notwendigen 
Wassermenge beliefert werden. 


Tabelle. Das brauchen Sie, wenn 
Sie Ihre Blumen mit dem Commodore 
gießen wollen. 


Anwendung des Monats 
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Anwendung des Monats 









Das Programm: eine Uhr 

Das Gießprogramm be¬ 
steht im wesentlichen aus 
der Programmierung der 
Echtzeituhr im CIA 1. Dieses 
Programm entstammt dem 
Data Becker-Buch 64-intern. 

In Zeile 100 bis 270 wird die 
Uhr gestellt, in Zeile 280 bis 
480 die laufende Uhr pro¬ 
grammiert. In Zeile 440 wird 
abgefragt, ob der Zeitpunkt 
zum Gießen erreicht ist. 
Wenn dies der Fall ist, wird 
in die Subroutine 1000 ver¬ 
zweigt. In diesem Unterpro¬ 
gramm wird das Datenrich¬ 
tungsregister auf Ausgang 
geschaltet und mit POKE 
56577,1 die PBO-Leitung auf 
High gelegt. In Zeile 1030 
schließlich wartet das Pro¬ 
gramm 20 Sekunden und 
schaltet in Zeile 1050 die 
Pumpe wieder aus. Die War¬ 
teschleife in Zeile 1030 kann 
dem jeweiligen Anwen¬ 
dungsfall angepaßt werden. 

Das Programm läßt sich 
natürlich für beliebige 
Schaltzyklen und Schaltzei¬ 
ten abändern. 

(Klaus Michael) 



IS 



6 


UHR LAEUFT ***** 

>) : M-PEEK (C+2) s S-F'EEK UM-1) 


M>59 THEN 140 
230 P O K E C -i" 2,1 6 * IN T (M / i 0) + M -• IN T (M /10) * 10 
24ß IFS >59 THEN 140 

10 POKEC+1 , 1 6* I NT < S/ 10) +S~ .1 NT (S/10) * 1 (?) 
POKEC,0 
PRINT"" 

REM ***** 

H—PEEK < C+ 

FL= 1 

I F r H >32 THEN H==IT~128s FL=0 

H~ I NT (H/ 18 > * 10+IT -1 NT (H/ X 6) * 16s ÜN FL GOTO 
IF 1-1-12 THEN 360 
H=H+12 

IF H--12 THEN H=ß 
M=INT(M/16)*10+M-1NT(M/16)* 16 
S=INT(B/1fo)*10+3-1NT(8/16)* 1 6 
TT-STRT(T) 

LEN (HT> --2 THEN H$ : =" 

LEN (MT) --2 THEN MT=" 


T-PEEK(C) 


50 


HT=STRT(IT) s IF 
MT-STRT(M)aIF 
ST-STRT(S)sIF 
GlT-RIGHTT (ITT 


LEN(ST)=2 


ß" +RIGMTT <ITT, 1) 
0"+RIGHTT(MT,1) 
0"+RIGHTT(ST„1) 


2) +RIGITTT (MT , 2) +RI GHTT ( ST , 2 ) 


REM **** ZEITPUNKT 


ERREICHT? **** 


IFVAL(GIT)=205500THEN Gü SUB1000 
PRINT""; 

PR I MT R I GHTT ( ITT , 2 > " :: " R I GHTT ( MT 
PRINT RIGHTT (TT,1) 

GOTO 290 

3 REM ***** SOHALTUiNTERPROGRAMM ***** 
) REM **** PUMPE E IMSCHAL TEN ***■* 

3 POKE56579 „ 1:: P0KE5657" 7 1 


"RIGHTT(ST, 




REM **** RUM PL AUSSCHAL 

PÜKE56577,0 

RETURN 




READY 


Das Listing zum Blumengießen (Schluß) 


14 13 12 11 10 9 8 


RI 


lkfi 
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VC 20 


Erstes Strubs-Listing 




»Sticcßü 


Unser Kurs über den Precompiler 

».Qtriihcrr ict prcf in Hipcnr Ancnnhp 


I ch war so begeistert, daß ich mich gleich hingesetzt und 
ein Programm geschrieben hatte, um die Fähigkeiten 
von Strubs zu testen, und ich muß sagen, Strubs ist ein Pro¬ 
gramm, das hält, was es verspricht. 

Das von mir mit Strubs entwickelte Programm »Menü« 
liegt als Quell- und Objektprogramm vor. Der Benutzer 
kann damit seine Programme nur mit Hilfe der Funktions¬ 
tasten und der Returntaste auswählen und starten, so daß 
die umständliche Ladeprozedur per Hand entfällt. 

Will man mit »Menü« arbeiten, trägt man zunächst in 
Data-Zeilen ab Zeilennummer 10 den Text, der auf dem 
Bildschirm erscheinen soll (maximal 34 Zeichen ein und 
dann in der gleichen Zeile — durch Komma getrennt — 
den genauen Namen des Programms, das geladen wer¬ 
den soll. Die Verwendung des Jokers (*) zur Abkürzung ist 
dabei auch möglich. Anschließend speichert man Menü 
ab und kann es starten. 

»Menü« faßt immer 10 Programme auf einer Bildschirm¬ 
seite zusammen und blättert — je nachdem man mit dem 
Pfeil, der auf die Programme zeigt, nach unten oder nach 
oben aus dem Bildschirm heraus will — weiter oder zu¬ 
rück. 

Bei Programmen, die arößer sind als »Menü« ist darauf 
zu achten, daß in der ersten bearbeiteten Programmzeile 
eine Routine steht, die die Pointer auf das Basic-Ende aus¬ 
richtet (siehe dazu Zeile 1 von »Menü«), 

Ersetzt man in den Programmen, die durch »Menü« gela¬ 
den werden sollen noch die END-Anweisung — oder das 
Programmende, falls keine END vorhanden — durch LO- 
AD"MENUE”,8, so wird nach Beendigung des gewählten 
Programms automatisch wieder »Menü« geladen. 

Vorsicht ist geboten bei Programmen, die den BASIC- 
Anfang oder das RAM-Ende verschieben, da diese Pro¬ 
gramme zum Systemabsturz führen, wenn man die ent¬ 
sprechenden Vektoren nicht zurücksetzt. 

»Menü« müßte auch auf dem C 64 laufen, ich konnte es 
aber leider nicht testen. (Gerd Sombetzki) 



Folgende Änderungen nahm ich für meinen VC 20 mit 
40/80 Zeichenkarte, 32 K-RAM, Floppy 1541 und VC 1526 
vor. Zunächst verlegte ich die Maschinenroutine in den 
Kassettenpuffer. Zeile: 45610 POKEBB8 + i, w: ...usw. 

Der Spmng zur Interpreterroutine $A7E7 = #167 liegt 
beim VC 20 bei $C7E7 = #199. Außerdem fehlte das im 
Assemblerlisting vorhandene PLP = $28 = #40. 

D.h.: Zeile 45620 DATA32, 115,0,8,201,33,240,4,40,76,231, 

199,40 

45630 DATA169,18,133,44,160,138,70,231,100,990 
Verschieben der Initialisierungsroutine: 

45650 FORI=0TO10:READW:POKE850+I,W 

45670 SYS850 

45680 DATA169.60.141, 8,3,169,3,141,9,3,96 
Die Änderung des Wertes 8 in 18 in der Zeile 45630 ist 
notwendig, da der Basic-Anfang beim VC-20 mit Erweite¬ 
rung ) = 8K bei $1200 beginnt, also Highbyte $12= #18. 
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Erstes Strubs-Listing 



Strubs-Listing »Menü« 
(Anfang) 
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Erstes Strubs-Listing 


Strubs-Listing »Menü« 
(Schluß) 
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Erstes Strubs-Listing 


VC 20 


1 P0KE45,PEEKC 174):P0KE46,PEEKC 175>«CLR:GOTO 10000 
5 REM"OATAZEI LEN_ENTHALTEN_<PROGRAMMNAME > ,_< LADENAME 

98 DATA “ENDE.■ „ ». 

100 DATA© ,(2 
1000 s 

1030 IFNOT<AN/10-INTCAN/10>=0>THEN1051 
1040 MD=AN/10-1 

1050 GOTO 1070 

1051 : 

10G0 MD=INTCAN/10> 

1070 : 

1090 M=0 
1 100 : 

1110 GOSUB1500 
1120 T=1 
1 130 s 

1140 GOSUB2000:GOSUB2200 
1150 IFNOTC TA =0)THEN1171 
1160 GOTO 124 1 

1170 GOTO 1230 

1171 IFNOT< TA »-1>THEN1191 
1180 T=T-1!IFT<1THEN1241 

1190 GOTO 1230 

1191 IFNOTCTA=1)THEN1230 
1200 T = T +1s IFT>10ORT+M*10 >ANTHEN1241 
1230 : 

1240 GOTO 1130 
124 1 : 

1250 IFNOTCTA=0)THEN1271 
1260 GOTO 1321 

1270 GOTO 1310 

1271 IFNOTC TA = -1)THEN1231 
1280 M=M-1:IFM<0THENM=0 

1290 GOTO 1310 

1291 IFNOTC TA=1)THEN1310 
1300 M=M+1 s IFM>MOTHENM=MD 
1310 : 

1320 GOTO 1100 

1321 : 

1330 GOTO2400 
1500 : 

1510 GOSUB1700 
1520 I=M*10+1 

1530 IFNOTC I< =M*10+10ANDI< =AN)THEN1561 
1540 PR INT: PRINTTABC 5 )PN*C I ) 

1550 1=1+1 

1560 GOTO 1530 

1561 ! 

1570 GOSUB1800 
1580 RETURN 
1700 ! 

17 10 PRINTCHR*C 147 )TABC 12)"PROGRAMMAUSWAHL“ 

1720 PR INTTABC 12)"===============" 

1730 RETURN 
1800 : 

1810 Z=24:S=2:GOSUB1900 
1820 PR INTRO®"Fl => OBEN"RF*" “; 

1823 PRINTR0*"F3 => UNTEN"RF*" "; 

1826 PRINTRO*"RETURN => LOAD"RF*) 

1830 RETURN 
1900 : 

1910 PRINTCHRSC 19 5LEFTSC CDS,Z-1)LEFTS( CR*,S-1 ); 

1920 RETURN 
2000 : 

2020 Z=T*2+2«S=2iGOSUB1900 
2030 IFQ=1THEN2050 
2040 PR INT"==>“:GOTO2060 

2050 PRINT.. 

2060 : 

2070 RETURN 
2200 : 

2210 i 

2220 GETTA*:IFTA*=""THEN2220 
2230 IFNOTC TA*=CHR*C 133))THEN226 1 
2240 Q-lIGOSUB2000 


S*GR 


2250 TA = -1s GOTO2321 

2260 G0T02310 

2261 IFNOT< TA*=CHR« 13) )THEN2281 
2270 TA =0 s G0T02321 

2280 G0T02310 

2281 IFNOTC TA*=CHR*< 134 ) )THEN23 10 
2290 Q=1!GOSUB2000 

2300 TA=1s GOT02321 
2310 s 

2320 G0T02210 

2321 S 
2330 RETURN 
2400 : 

2410 NU=M*10+T 

2420 Z=T*2+2!S=6s GOSUB1900 

2430 PRINTRO*PN*<NU)RF* 

2440 IFLEFT*C PN*< NU),4) = "ENDE"THEN2700 
2470 LOADLN*CNU),8 
2700 : 

27 10 PRINTCHR*C 147>? 

2720 PRINTLEFT*CCD®,10)TABC5); 

2730 PR INTRO*" F5 => MENUE 

2740 PRINTTABC5)RO*" F7 => ANDERE DISK" 

2750 PRINTTABC 5 >RO*"RETURN ■= > ENDE 
2760 s 

2770 GETTA*:IFTA*=""THEN2770 
2780 IFNOTC TA*=CHR*C 135 ) )THEN280 1 
2790 RUN10000 

2800 GOTO2920 

2801 IFNOTC TA*=CHR*C 136 ) )THEN286 1 

2810 PR INT: PRINTTABC 5) "BITTE ANDERE DISK. E INLEGEN, 
2820 PRINTTABC5)“DANN BEL. TASTE DRUECKEN!" 

2830 GETTA*:IFTA*=""THEN2830 
2840 7 EN15,8,15,“I“SCLOSE15 
2850 LOAD"MENUE",8 

2860 GOTO2920 

2861 IFNOTC TA*=CHR*< 13) )THEN2920 
2870 PRINTCHR*( 147) 

2880 PR INT"BITTE DISKETTE DEM LAUFWERK ENTNEHMEN," 
2890 PRINT"DANN LAUFWERK UND RECHNER ABSCHALTEN." 
2900 PR INT:PR INT"BY, BY!" 

2310 END 
2920 : 

2930 GOTO2760 

2931 : 

100^0 : 

10012 REM"_ 

10014 REM”_ 

10016 REM"_ 

1001B REM". 

10020 REM"_ 


„MENUE_VERSION_VOM_01.05.84_ 

_GERD_SOMBETZK I_ 

47 

.13_ 


.FUHRMANNSTR .. 


_4S00_DORTMUNO. 

_TEL.:_0231/213656. 


10030 GOSUB 10 100 
10040 GOTO 1000 
10100 : 

10130 GOSUB10300iIFAN=0THEN2700 
10140 OIMPN*C AN) ,LN*C AN) 

10150 RESTORE 

10160 FOR1=1TOAN 

10170 REAOPN*C I ) ,LN*C I ) 

10180 NEXT 

10220 CO*="M"«RO* =“S" 

10230 CR*="U":RF*= 

10240 FORI=1T07 

10250 CD*=CO*+COS:CR*=CR*+CR* 

10260 NEXT 
10290 RETURN 
10300 : 

10310 RESTORE:AN=—1 
10320 ! 

10330 REAOPN*,LN* 

10340 AN=AN+1 

10350 IFNOTC PN®=“©")THENI0320 
10360 RETURN 

So würde das Programm ohne den 
r eady. Precompiler aussehen. 
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Wollen Sie einen gebrauchten Computer ver¬ 
kaufen oder erwerben? Suchen Sie Zubehör? 
Haben Sie Software anzubieten oder suchen 
Sie Programme oder Verbindungen? Die FUND¬ 
GRUBE von 64'er bietet allen Computerfans die 
Gelegenheit, für nur DM 5,— eine private Klein¬ 
anzeige mit bis zu 5 Zeilen Text in der Rubrik 
Ihrer Wahl aufzugeben. Und so kommt Ihre pri¬ 
vate Kleinanzeige in die FUNDGRUBE der 

August-Ausgabe (erscheint am 20. Juli 84): 
Schicken Sie Ihren Anzeigentext bis zum 28. 
Juni 84 (Datum des Poststempels und Anzei¬ 
genschluß) an »64'er«. Später eingehende Auf¬ 
träge werden in der September-Ausgabe (er¬ 
scheint am 17. Augusl 84) veröffentlicht. 



Am besten verwenden Sie dazu die vorbereitete 
Auftragskarts am Anfang des Heftes. Bitte be¬ 
achten Sie: Ihr Anzeigentext darf maximal 5 Zel¬ 
len mit je 32 Buchstaben betragen. Überweiser 
Sie den Anzeigenpreis von DM 5,— auf das 
Postscheckkonto Nr. 14199-803 beim Post¬ 
scheckamt mit dem Vermerk »Markt 8. Technik, 
64’er«, oder schicken Sie uns DM 5,— als 
Scheck, In Briefmarken oder In Bargeld. Der 
Verlag behält sich die Veröffentlichung längerer 
Texte vor. Kleinanzeigen, die entsprechend ge¬ 
kennzeichnet sind oder deren Text auf eine ge¬ 
werbliche Tätigkeit schließen läßt, werden in 
der Rubrik »Gewerbliche Kleinanzeigen« zum 
Preis von DM 10,— je Zeile Text veröffentlicht. 
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Hardcopy 


C 64 


— Byte auflösen — 


SC = 7 zu 0 Step —1 


Byte in Bits auflösen 
Ä = B (0-7) 




Wer sich den 
Commodore VC 1520 kauft, 
ist sich meist auch dem Nachteil dieses VC 1520- 

Druckers/Plotters bewußt. Einer 
dieser Nachteile ist die fehlende Möglichkeit, 
Hardcopys mit den gängigen 
Basic-Erweiterungen (Simons Basic, 


. x = SW-C-SQ + Z + 70 
x — Position für PR/Pl. 




Y = —L 
y-Position 






Fahren von Pen 
zu X, Y Position 



Flußdiagramm 
Subroutinen 
für »Hardcopy 
VC 1520« 


Zeichnen zu 
X+ 1, Y Position 


Extended 
Basic und so 
weiter) 
erstellen zu 
können. 


D 


as abgebildete Pro¬ 
gramm bietet nun die 
Möglichkeit, jedes Bild in 
High Resolution Byte für Byte 
auszudrucken, wenn es sich 
im Bereich $2000^Dez.8192 
bis $3FFF = Dez.l6383 befin¬ 
det. Steht das Bild in einem 
anderen Bereich, ist ledig¬ 
lich die Variable C in Zeile 
257 in die gewünschte An¬ 
fangsadresse zu ändern. 

Um ein High Resolution- 
Bild auszudrucken, ist zu¬ 
nächst die Zeile: 
POKE44,64:POKE64 + 256,0: 
NEW einzugeben. Anschlie¬ 
ßend wird das auszu- 
druckende Bild absolut (LO- 
AD"Bild"8,l) geladen. Jetzt 
erst wird nach vorherigem 
NEW das Hardcopy- 
Programm geladen und mit 
RUN gestartet.' 

Der Ausdruck dauert 
dann, je nach Bild, immer 
noch eine ganze Weile. Dies 
ließ sich, ausgehend von der 
Hardware, leider nicht än¬ 
dern. 

G- Wichmann) 
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Hardcopy 


C 64 


80 

90 


1 REM 

2 REM 

3 REM* * SPRUNG HAUPTPROGR. * 

4 REM 

5 REM 

6 GOTO200 
10 REM 
20 REM 

30 REM* SUB ROUTINE * 

40 REM* BYTE AUFLOESEN * 

50 REM 
60 REM 

70 FORSC=7TO0STEP-1 

: IFA—2"--SC<0THENB(7-SC) =0: GOTO 100 

:B(7-SC > =1:A=A-2 A SC 
100 NEXTSC 
110 RETURN 
200 REM 
210 REM 

220 REM* EINLESEN VON BYTES * 

230 REM* HAUPT-ALGORITHMUS * 

240 REM 
250 REM 

256 FORSC=1024TO2023:PGKESC.16:NEXT:POKE 
53265,59:P0KE53272,24 

257 C=8192 

260 DIMB(9):REM* KONSTANTE * 

270 OPEN1,6,1:REM* 1520 AUF X/Y PLOT * 
275 F0RSQ=L2T0L2+7:L=L+1 

:F0RSW=C+SQT0C+SQ+312STEPS 
:A=PEEK(SW):IFA=0THEN320 
:GO3UB70 
:GOSUB450 
320 :Z=0:NEXTSW 
325 NEXTSO 

330 L2=L2+320:IFL2<7683THEN275 
340 REM 

350 REM* ENDE * 

360 REM 

370 CLOSEI:0FEN4,6:REM* 1520 AUF ASCII * 
380 F0RSC=1T03:F’RINT#4."" 

390 NEXTSC: CL0SE4: END: F:EM*************** 

* VORSCHUB DES 1520 * 

400 REM 
410 REM 

420 REM* AUSDRUCKEN AUF PRINTER/PLOTTER 
430 REM* 1520 IN HIRES * 

440 REM 
450 REM 

452 IFB(Z)=1THEN460 
454 Z=Z+1:IFZ<8THEN452 
456 RETURN 

460 X=SW—C—SQ+Z+70:Y=—L:FRINT#1,"M",X,Y 
510 IFB (Z+l) =0THENF'RINT# 1, "D" , X+ 1 , Y: GOTO 
454 

520 Z=Z+1:X=X+1:GOTO510 


280 

290 

295 

300 


READY. 


Listing »Hardcopy mit dem VC 1520« 
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Commodore Grafik auf Epson 


C 64 




«•.»ssSS«***. 


•ÄoWen 

«•rf5?jSt25 


E s handelt sich hierbei um ein Ma¬ 
schinenspracheprogramm mit 
726 Byte Länge, das den Adreß- 
bereich CB57- CBD1 (dezimal: 51456 
bis 52182) belegt. Damit kann zum 
Beispiel das DOS 5.1 auf der Demo¬ 
diskette ohne Probleme zusätzlich 
geladen werden. 

Das Programm ist ohne Einschrän¬ 
kung für alle Centronics-kompati- 
blen Drucker anwendbar, die über 
einen Bitmustermodus verfügen. 
Dieser Modus wird für die Ausgabe 
der Commodore-eigenen Grafikzei¬ 
chen benötigt. Das Programm be¬ 
steht aus mehreren Programmtei¬ 
len, von denen die meisten Erweite¬ 


Der Textmodus (Groß- und Klein¬ 
schreibung) ist unter Gerätenum¬ 
mer 18 und, weil er wohl am häufig¬ 
sten bei bereits bestehenden Pro¬ 
grammen benutzt ist, unter Geräte¬ 
nummer 4 ansprechbar Die Geräte¬ 
nummer 19 realisier! den Groß- 
schnft/Grafik-Modus, wie er beim C 
64 gleich nach dem Einschalten vor¬ 
eingestellt ist. Der wichtige Modus 
zum Listen von Programmen wurde 
mit Gerätenummer 17 realisiert. Es 
läßt sich über die Sekundäradresse, 
wie in dem Musterlisting (Bild 4) ge¬ 
zeigt, noch zwischen vier Fällen un¬ 
terscheiden. Einmal kann ausge¬ 
wählt werden, ob das Listing, wie 
vom Bildschirm her gewohnt, mit 
Großbuchstaben und Grafikzei- 

chen oder im Textmodus mit großen 


Adresse $CAC4. Zu diesem Zweck 
wird der Zeichengenerator des C 64 
ausgelesen. Die Zeichen, die aus ei¬ 
ner 8x8 Punktmatrix bestehen, sind 
dort in je 8 Byte abgelegt. Jedes Byte 
repräsentiert das Punktmuster ei¬ 
ner Zeile der Matrix. Ein Matrix¬ 
drucker druckt die Zeichen, indem 
er sie ebenso als Muster von matrix¬ 
artig angeordneten Punkten zu Pa¬ 
pier bringt. Jedoch gibt er die Punkt¬ 
matrix nicht wie der Bildschirm zei¬ 
lenweise sondern spaltenweise aus. 
Deshalb wird in OUTGEN die im 
Zeichengenerator in 8 Zeilenbyte 
gespeicherte Zeichenmatrix zu¬ 
nächst in 8 Spaltenbyte umorgani¬ 
siert. Nach Umschalten des 
Druckers in den sogenannten Bitmu¬ 
stermodus, in dem er jedes ankom- 
mende Datenbyte nicht mehr als 
ASCII-Zeichen sondern als Muster- 
Joyte für eine Matrixspalte interpre 


rungen bestehender Ein-/Ausgabe- 
routinen des Betriebssystems sind 
und bei der Initialisierung in diese 
eingebunden werden. Dadurch 
können schon bestehende Basicbe- 
fehle wie OPEN und PRINT# zum 
Drucken benutzt, und Programme 
müssen nicht umgeschrieben wer¬ 
den. Zur Ansteuerung verschiede¬ 
ner Druckmodi wurden jedoch zu¬ 
sätzliche Gerätenummern definiert, 
deren Bedeutungen in Bild 1 erklärt 
sind. Gerätenummer 16 realisiert ei¬ 
nen sogenannten Direktmodus, mit 
dem die internen Commodorezei- 
chencodes ohne Wandlung an den 
Drucker gelangen. Der Direktmo¬ 
dus ist zur Ausgabe von Steuerzei¬ 
chen oder bei der Verwendung des 
Druckers als Plotter zur Einzelnadel¬ 
steuerung beziehungsweise zur 
Ausgabe von Bitmustern geeignet. 


und kleinen Buchstaben gedruckt 
wird. Zum anderen kann man aus¬ 
wählen, ob die Steuerzeichen wie 
bei der Bildschirmausgabe als in¬ 
verse Zeichen oder durch Abkür¬ 
zungen wie (CRD) (Cursor down) im 
Klartext gedruckt werden. Durch all 
diese Möglichkeiten kann der An¬ 
wender zum einen auf seinem 
Drucker Ausgaben erzeugen, wie 
man sie von Commodore-Druckern 
her gewohnt ist, zum anderen auch 
alle Möglichkeiten seines Druckers 
voll nutzen. 

Commodore-eigene 

Grafikzeichen 


Die Ausgabe von Grafikzeichen 
erfolgt in der Routine OUTGEN ab 


tiert, gibt OUTGEN die acht geän¬ 
derten Zeichenbyte an den Drucker 
aus. Dieser fügt sie wieder zu einem 
8x8 Punktmatrixzeichen zusam¬ 
men, So ist es möglich, auf einem 
Matrixdrucker exakte Kopien der C 
64-Bildschirmzeichen herzustellen, 
obwohl dieser nicht über den ent¬ 
sprechenden Zeichensatz verfügt. 


Handhabung 
des Programms 


Die etwas Konzentration fordern¬ 
de Methode der Programmeingabe 
besteht im Eintippen des abgebilde¬ 
ten Basicprogramms (Bild 2), in dem 
das Treiberprogramm in DATA-Zei- 
len steht. Ein eingebauter Quersum- 
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Bild 3. 

Der Verkabelungsplan 


mentest deckt hoffentlich Eingabe¬ 
fehler auf. 

Zur Herstellung des Verbindungs- 
kabels zwischen Userport und 
Drucker ist in Bild 3 eine Verbin¬ 
dungstabelle angegeben. Das Ka¬ 
bel sollte für eine störungsfreie 
Funktion nicht länger als ein Meter 
lang sein und aus einem abge¬ 
schirmten, mehradrigen Steuerka¬ 
bel bestehen, das man in (fast) je¬ 
dem Elektronik-Bastelgeschäft fin¬ 
det. Dort sind auch meist der Cen- 
tronicsstecker und der Stecker für 
den Userport erhältlich. 

Initialisiert wird die geladene 
Treiberroutine mit 
SYS 12*4096 + 9*256 beziehungs¬ 
weise SYS 51456 

Hierbei wird die Routine in das 
Betriebssystem eingebunden. Je¬ 
doch Vorsicht; Nach einem Break, 
zum Beispiel durch die Betätigung 
der Tasten RUN/STOP und RESTO- 
RE ausgelöst, muß die Routine er¬ 
neut initialisiert werden, da die I/O- 
Vektoren vom Betriebssystem zu¬ 
rückgesetzt wurden. Die einzelnen 
Druckmodi spricht man mit den üb¬ 
lichen Basicbefehlen an. Geöffnet 
wird der Ausgabekanal mit; 

OPEN log. Dateinummer, Geräte- 
adr, [.Sekundäradr.] 

Die eckigen Klammern kennzeich¬ 
nen optionale Angaben. So dann 
kann auf den geöffneten Kanal mit 
PRINT # log. Dateinummer ausge¬ 
geben werden. Ein Programmlisting 
wird zum Beispiel erzeugt mit (Bild 4) 
den Befehlen 

OPEN 17,17 [Sekundäradr.]:CMD17: 
LIST 

PRINT #17 : CLOSE 17 


Der PRINT-Befehl vor dem CLO¬ 
SE ist notwendig, damit der CMD- 
Modus aufgehoben wird. 


Umstellen auf beliebige 
Drucker mit Centre. Jcs- 
Schnittstelle 


Das Programm wurde für einen 
Epson-Drucker geschrieben. Un¬ 
verändert ist es für jeden anderen 


USER PORT — CENTRONICS 

A 

GND 

16 

B 

FLAG - BUSY 

11 

C 

DO 

2 

D 

Dl 

3 

E 

D2 

4 

F 

D3 

5 

H 

D4 

6 

J 

D5 

7 

K 

D6 

8 

L 

D7 

9 

M 

PA2-STROBE 

1 



Tß E In 5 F 56 T0 52102 

nexTT P0KE *•*' s=s.x 

Y*r /31 THEN p «nt.. fehler in mt 

SYS 51456 
REM 

REM CENTR0 ^CS TR EJBERRDUTINE 


169 , 90 , 
2 ? , 3, 

3 »140, 
141, 30, 
160 , 201 , 
169 , 227 , 
39 » 3, 

2 , 221 , 
72 , 169 , 
lc, 4,141 , 
4 , 141 , 

22 1 , 96 , 
243,208, 
22 4, 10, 
152 , 165 , 


160,201, 
169,145, 
29 > 3, 

3,140, 
141, 32, 
160,201, 
169,255, 

9 > 4 ’ 
16, 44, 

1 , 221 , 
0 , 221 , 
166 ,I 84 , 

3, 76, 

144, 3 , 

194,157, 




,141. 

,160,201 
»169,200 
* 33, 3 

» 3,140 

, 221,173 
»221, 96 
,240,251 
» 221 , 9 
»141, O 
* 32 , 15 
»166,152 
»246,230 
»165,185 
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215 

216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 




data 

DATA 
DATA 

data 
data 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


9, 96 
99, 2 

144, 2 

243, 32 
32, 31 
16,176 
157,242 
240, 3 

165,186 
144, 3 

32, 15 
32, 31 
4,201 
76, 91 
201, 16 
76,205 
158,164 

64.201 
6, 32 
4,240 

43.202 
3, 32 

104, 24 
95,176. 
193,144. 
127, 76, 
201, 96 
64, 16 
6, 76 
162, 94 
185,192 
127,201 
41, 1 

4,201 
233, 64 
3, 76 
233, 64 
202,104 
201, 24 


,157,109, 2 

»201, 4,240 

, 24, 96,201 
, 20,243,240 
,243,138, 72 
, 7,201, 4 

, 76,241,242 
, 76, 1,247 

,201, 4,240 

, 76, 10,247 
,243,240, 3 

,243,165,186 
, 16,144, 3 

,242, 72,133 
,176, 7,201 

,241,152, 72 
,154,192, 16 
, 24,144, 31 
, 92,202, 24 

* 4,192, 18 

, 24,144, 7 

, 68,202,104 
, 96,201, 65 
' 4, 9 , 32 

• 6 , 201,222 

, 64,201,201 
, 176, 3, 76 

, 2,233, 64 

,196,202,201 
,160,208,208 
,255,208, 2 

, 32,144, 44 
,240, 16,104 
,192,144, 3 

,208, 14,104 
, 64,201,233 
,160,208,132 
, 36, 15, 48 
,105, 64, 48 


,165, 

» 4, 

* 0, 
* 2 , 
,165, 
,240, 
, 32, 
, 32, 
i 4, 
, 76, 

, 76, 

,201 , 

, 76, 
,158, 

* 4, 

,138, 
,208, 
,192, 
,144, 
,208, 
,192, 
,170, 
,144, 
,208, 
,176, 
,255, 

, 64, 
,160, 
,255, 

* 91, 
,230, 
,168, 
, 201 , 

, 76, 

,201 , 

, 64, 

, 6 , 

. 3, 

, 2 , 


186,157 
201, 16 
76,119 
24, 96 
186,201 
3, 76 

15.243 

31.243 
201, 16 

25,242 
1,247 
4,240 
117,242 
165,154 
240, 3 

72,165 
6, 32 

17.208 
21,192 

6, 32 

19.208 
104,168 

18,201 
10,201 
2, 41 
240, 24 
201,233 
208,132 
208, 6 
72,164 
185, 41 
165,185 
160,144 
43,202 
96,176 

16 ’ S4 2 
76,196 
76, 64 
105, 64 


254 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 

285 

286 

287 

288 

289 

290 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

data 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

data 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DA 1 ■* 1 

DATA 


2,208,113,160 
1,240, 2,160 


170.165.185, 41, 

208.165.185, 41, 

21 7 , i^ , ioo’ 138,168 ’ i69 ’ 0,162 

7A 7* 2 * 202 ’ 16 - 250.152 

74 ’ 74 ’ 74 > 2i »,l01, 6 

169 T ?\5’ i S’ 10 ’ 10,133, 5 

3 * 12 °, 165, 1, 41 

25i,133, 1,160, 7,177, 5,133 

7, 6, 2,144, 8,189 

5, 3,157,192, 2,202 

o* 3,136, 16,230,165 

ia^,2io,203;'S; 6i;Ä 2 2 ; 22 4° 

-5’ 2 ??’ 245 ’ 162 ’ 7,189,192, 2 

64,201,202, 16,247, 24 96 


3,201, 69 
2 

5, 8 


2,162, 
192, 2, 

16,241, 
1» 9, 


48, 


,213,144, 

1»202,138, 

, 80,144, 

2,233, 3, 

, 2,233, 

3,201, 65, 

i 33,201, 

28,144, 2, 

- 17,144, 

2,233, 11, 

170,169, 

60, 32, 64, 

202,240, 

8,200,185. 

^50, 48,245,200,185. 

6, 32, 

64,201, 24, 

127, 32, 

64,201,169, 

201, 87, 

72,212, 67, 

79,206, 

72, 79,205, 


1 76*21*' 79’ 2 fl°’ 71 ’ 82 ’ 206 ’ 66 

179’ 7o\n?’ !?’ 199 ’ 70 ’ 177 - 70 
1/9, 70,181, 7u,183, 70.178 70 

S’2«’ £’ 184 ’ 

82 ’ 79 -^B, 67, 76 
So’, 77 ’ ® 2 ’ 206 ’ 7Z . 82,212, 71 
?;’ 177 ’ 71 ’ 82,173, 72, 71,206 

21o’ ü ’ 71 ’ 179, 80, 85 

09 ’ * 7 ’ f 2 ’ 204 ’ 89, 69,204, 67 
89,206, 27, 42, 4, S, 0 


READY. 


Basic-Lader für das Treiberprogramm (Schluß) 


QÜ--— C 3rnn \ <h 

POKE 5 1 ’ 

JKE 53280 ; 

SS SSWiÄ-SKl--*- 

SE ':««•«■ * *" 

Ä : Väv» «®«- usb * *"„ 
ff - Bua ®" *. 

, ff -«««“;■' 5 * 
;ff'• 

ri PRlW T ’ * - : 


int "** _____—— 

e,siel " 


Drucker verwendbar, sofern auf die 
Ausgabe von commodoreeigenen 
Grafikzeichen verzichtet wird. Für 
diese Funktion muß der Drucker je¬ 
doch vorübergehend in den Bitmu- 
stermodus umgeschaltet werden, 
was wählend einer normalen Texl¬ 
ausgabe möglich sein muß. Diese 
Umschaltung erfolgt im Programm 
in der Schleife ab Adresse $CB10. 
Die Anzahl der auszugebenderi 
Steuerzeichen ist unter Adresse 
$CB18 gespeichert und die Steuer¬ 
zeichen selbst stehen ab Adresse 
$CBD2 am Ende des Programms. 
Für einen Epson-Drucker wird die 
Folge: 

ESC »*« 4 8 0 

ausgegeben, wobei mit vier der Bit¬ 
mustermodus »CRT-Grafik« ausge¬ 
wählt wird, 8 das niederwertige Byte 
und 0 das höherwertige Byte der 
Anzahl auszugebender Punktma- 
trixspalten darstellt. Der Epson- 
Drucker kehrt nach der Ausgabe 
der spezifizierten Anzahl Musterby¬ 
tes wieder in den Textmodus zu¬ 
rück. 

(H.Eyssele) 
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Mitmachen, aber wie? 


Die 64’er-Redaktion freut 
sich über jeden Beitrag un¬ 
serer Leser. Die Erfahrun¬ 
gen bei unseren Schwester¬ 
zeitschriften haben aber ge¬ 
zeigt, daß viele Einsender 
nicht genau wissen, in wel- - 
eher Form sie ihre Manu¬ 
skripte einsenden sollen, 
Die unten aufgeführten 
Punkte stellen keine »Richtli¬ 
nien« dar. Dennoch sollte 
sich jeder, der ein Pro¬ 
gramm oder einen Artikel 
einsenden will, an ein ge¬ 
wisses Schema halten. Dies 
erleichtert zum einen die 
Arbeit der Redaktion, zum 
anderen kommt es auch Ih¬ 
nen selbst zugute, da wir 
vollständige Listmgs oder 
Artikel schneller veröffentli¬ 
chen können. Folgende Kri¬ 
terien sind also generell zu 
beachten, 

1. Auf der ersten Seite des 
Anschreibens sollten der 
Name, die vollständige An¬ 
schrift mit Telefonnummer 
sowie das Einsendedatum 
stehen. 

2. In der »Betreffzelle« tra¬ 
gen Sie die genaue Spezifi¬ 
kation des verwendeten 
Computers und falls erfor¬ 
derlich, die Basic-, ROM- 
oder DOS-Versionen sowie 
die Speicherkonfiguratio¬ 
nen ein. Der Titel des Arti¬ 
kels sollte ebenfalls daraus 
ersichtlich sein (auch für 
eventuelle Nachträge). 

3. Im darauffolgenden Text 
können Sie Wesentliches zu 
Ihrer Person, zur Entste¬ 
hungsgeschichte des Pro¬ 
gramms/Artikels, der Ab¬ 
sicht, der Vorteile gegen¬ 
über anderen Programmen 
oder Methoden, der Eigen¬ 
schaften und so weiter er¬ 
läutern. 

4. Auf der nächsten Seite 
beginnt die eigentliche Pro¬ 
grammbeschreibung. Diese 
sollte nach Möglichkeit mit 
der Schreibmaschine ge¬ 
schrieben werden oder als 
Computerausdruck vorlie¬ 
gen. Den Text bitte mit min¬ 
destens eineinhalb oder 
doppeltem Zeilenabstand 
verfassen. Am linken und 
rechten Rand mindestens 
drei Zentimeter Freiraum 
für Korrekturen und Bemer¬ 
kungen lassen. 


5. Diese und alle nachfol¬ 
genden Seiten sollten 
durchnumeriert sein und in 
der Kopfzeile jeweils den Ti¬ 
tel des Programms und den 
Namen des Autors enthal¬ 
ten. 

6. Der Überschrift des Arti¬ 
kels schließen sich zwei 
oder drei einleitende Sätze 
an, welche die wesentlichen 
Punkte des Textes zusam¬ 
menfassen. 

Der Text selbst sollte in et¬ 
wa folgenden Aufbau auf¬ 
weisen : 

— Angaben auf welchem 
Computer das Programm 
lauffähig ist sowie welche 
Erweiterungen und Peri¬ 
pherie notwendig sind 

— ausführliche Beschrei¬ 
bung der Programmfunktion 
(mit Verweisen auf Ein-/ 
Ausgabebeispielen wie 
Grafiken, Bildschirmfoto¬ 
grafien, Hardcopy s,,g oder 
Diagrammen) 

— detaillierte Programmbe¬ 
schreibung (mit Verweisen 
auf Programmahüaufplan, 
Variablendefinition, Start¬ 
adressen der einzelnen Un¬ 
terprogramme, Beschrei¬ 
bung wichtiger Programm¬ 
zeilen etc.) 

— eventuelle Umsetzung auf 
andere Basic-Dialekte oder 
Computer 

7. Die genauen Lade- und 

Abspeicherschritte des Pro¬ 
gramms und der im Pro¬ 
gramm vor komm enden 

Routinen sollten dokumen¬ 
tiert sein. 

8. Listmgs aus reprotechni¬ 
schen Gründen nur als Ori¬ 


ginal (keme Kopien) auf wei¬ 
ßem, unliniertem Papier mit 
neuwertigem Farbband ge¬ 
druckt einsenden. In den Li- 
stings dürfen grundsätzlich 
keine handschriftlichen Ein¬ 
tragungen stehen. 

9. In den Kopfzeilen des 
Programms bitte den Titel 
desselben, die Computer¬ 
konfiguration, den eigenen 
Namen und die Adresse mit 
Telefonnummer eintragen 
(es soll Vorkommen, daß 
sich Listings und Manuskrip¬ 
te verselbständigen, und mit 
beiden allein läßt sich wenig 
anfangen). 

REM-Zeilen im Programm 
dienen der Übersichtlich¬ 
keit und sollten, falls nicht 
speicherkritische Aspekte 
dagegensprechen, immer 
zur Strukturierung einge¬ 
setzt werden (siehe u, a. 
»Sauberes Programmieren«), 

10. Um das Eintippen für an¬ 
dere zu erleichtern, sollten 
Sie CHR$(X)-Werte und 
TAB(X) oder SPC(X) anstatt 
Cu/^nr-Manipulationen für 
die Ausgabeformatierung 
verwenden. So ist die Be¬ 
fehlssequenz FOR 1 = 1 TO 
6:PRINT:NEXT zur Erzeu¬ 
gung von sechs Carriage 
Returns leichter einzutippen 
und auf andere Basic-Com- 
puter wesentlich einfacher 
zu übertragen, Und ist es 
nicht auch übersichtlicher 
statt einem Dutzend Cursor- 
Rechts-Symbolen einfach 
SPC(12) zu benutzen? Über¬ 
prüfen Sie Ihr Programm 
einmal hinsichtlich dieser 
»Kleinigkeiten«. 


Wie 

schicke 
ich meine 
Programme 

ein? 


11. Da wir (in Ihrem eigenen 
Interesse) nur getestete Pro¬ 
gramme veröffentlichen 
wollen, legen Sie bitte unbe¬ 
dingt eine Diskette oder 
Kassette, auf der das betref¬ 
fende Programm mit minde¬ 
stens einer Sicherheitskopie 
abgespeichert ist, bei. Auf 
der Diskette/Kassette und 
deren Umhüllung unbedingt 
den Namen mit vollständi¬ 
ger Adresse und Computer¬ 
bezeichnung vermerken. 

12. Wollen Sie mehrere Pro¬ 
gramme/Artikel gleichzei¬ 
tig einsenden, so trennen 
Sie die Programme/Artikel 
nach dem oben aufgezeig¬ 
ten Schema. Die Einsen¬ 
dung mehrerer Disket¬ 
ten/Kassetten ist hingegen 
nicht notwendig. 

13. Artikel können beliebig 
lang sein — von einzeiligen 
Routinen bis zu Serien über 
mehrere Ausgaben, Ein 
durchschnittlicher Artikel 
hat rund vier bis acht 
Schreibmaschinenseiten. 

14. Hardcopys, Flußdia¬ 
gramme, Zeichnungen und 
Bildschirmfotos dienen der 
Anschaulichkeit. Sie sollten 
nach Möglichkeit nicht feh¬ 
len. Zu jedem der vorge¬ 
nannten »Zugaben« gehört 
aber eine Bildunterschrift 
und ein Verweis im Text. 

15. Programme/Artikel die 
unserem Verlag zur Veröf¬ 
fentlichung angeboten wer¬ 
den, sollten aus urheber¬ 
rechtlichen Gründen nicht 
gleichzeitig einem anderem 
Verlag vorliegen. 

16. Das 64'er Magazin zahlt 
für Listings eine Pauschale 
zwischen 100 und 300 Mark. 
Für reine Artikel beträgt 
das Honorar zwischen 0,80 
und 1,00 Mark pro Druckzei¬ 
le. Für Disketten/Kassetten 
werden 30 Mark extra be¬ 
rechnet. 

17. Sollten sich nach Erhalt 
eines positiven Anwort- 
schreibens noch irgendwel¬ 
che Änderungen oder Ver¬ 
besserungen des Pro¬ 
gramms ergeben haben, tei¬ 
len Sie uns das bitte umge¬ 
hend mit. In diesem Falle 
benötigen wir ein vollstän¬ 
dig neues Listing mit ent¬ 
sprechendem Datenträger. 

(aa) 
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„nun »Kurvendiskussion« 

Mit dem W m JJöihkeit, eine 
besitzen Sie die Mow 

kompiette Funkt p un Ktion aut 
führen. Sie Ü" und aut dem Drucker 
dem Bfldschwi orSJJ? pfotten iassen. 

1526 (neues ROM) P v . ftc hse, 

SSSÄ» ^ 

rvi v? 1-41 


Z usätzlich können Sie fol¬ 
gende wichtige grafische 
Daten abrufen: Nullstellen, 
relative Minima und Maxi- 
ma, das absolute Minimum 
und Maximum, die Fläche 
unter dem Graphen, das Vo¬ 
lumen des Rotationskörpers 
und Sie können einzelne 
Funktionswerte abfragen. 
Diese grafischen Daten wer¬ 
den auf einige Stellen hinter 
dem Komma genau berech¬ 
net. In seltenen Fällen kön¬ 
nen diese auch falsch be¬ 
rechnet werden. Dies ist teil¬ 
weise auf Fehler im Betriebs¬ 
system und auf Fehler bei 
der Approximation (Nähe¬ 
rung) zurückzuführen. 

Eingabe der Funktionsdaten 
a) Eingabe der Funktion 
Dies geschieht in der norma¬ 
len Commodore-Schreib- 
weise, wie sie in dem Hand¬ 
buch auf den Seiten 23 bis 29 
beschrieben ist. Beispiel: 
normale Darstellung: 

F(X) = COSX + COS2X + 
COS5X 

Eingabe in den Computer: 
COS(X) + CÖS(2*X) + COS 
(5*X) 

Mit dieser Schreibweise 
können Sie jede Funktion 
eingeben, die im Commo- 
dore-Basic implementiert ist: 
(ABS(X), ATN(X), COS(X), 
EXP(X), INT(X), LOG(X). 


(1:1, 1:2, 1:4). Je nach Eingabe 
SIN(X), SQR(X) und TAN(X)). der Vergrößerung wird die 
b) Eingabe des Intervalls, in Kurve entsprechend groß 
der die Funktion geplottet geplottet. Anschließend 
werden soll.’ wem* m noch wichtige Anga- 

Zuerst wird die linke Gren- ben zur Funktion gedruckt. 


ze des Intervalls eingege¬ 
ben, danach die rechte 
durch ein Komma getrennt. 
Die grafischen Daten wer¬ 
den später nur für dieses von 
Ihnen angegebene Intervall 
berechnet. Beispiel: norma¬ 
le Darstellung: 

[- 10,101 

Eingabe in den Computer: 
- 10,10 

Natürlich dürfen die Funk¬ 
tionen nur in definierten In¬ 
tervallen eingegeben wer¬ 
den. Die Wurzelfunktion ist 
zum Beispiel nur im positiven 
Bereich definiert. Sie darf al¬ 
so nicht im Intervall von —5 
bis 7 eingegeben werden, 

c) Eingabe der Einheiten 
Hier wird eine positive 

Zahl sowohl bei der X-Achse 
als auch bei der Y-Achse an¬ 
gegeben. Es können nur bis 
zu 30 Einheitenstriche auf 
der X-Achse und Y-Achse ge¬ 
plottet werden. Falls Sie kei¬ 
ne Einheitenstriche benöti¬ 
gen, drücken Sie einfach 
»RETURN«. 

d) Ausdruck auf dem 
1526-Drucker (mit neuen 
ROMs) 

Sie haben die Möglichkeit, 
die Funktion in verschiede¬ 
nen Maßstäben zu drucken 


Falls Sie später noch grafi¬ 
sche Daten abrufen werden, 
werden- diese automatisch 
auch noch gedruckt. Wenn 
Sie keinen Ausdruck auf 
dem Drucker benötigen 
oder wenn Sie keinen 
1526-Drucker besitzen, 
drücken Sie einfach »RE¬ 
TURN«. 

e) Höchster Y-Wert 
Das Programm ist so konzi¬ 
piert, daß die Funktion im¬ 
mer den gesamten Grafik¬ 
bildschirm voll ausnutzt. 
Wenn jetzt in dem angege¬ 
benen Intervall eine Unend¬ 
lichkeitsstelle auftritt, wird 
die Funktion im Bereich der 
X-Achse sehr gestaucht. Dies 
soll durch die Angabe des 
höchsten Y-Werts verhindert 
werden. Wenn Sie zum Bei¬ 
spiel die Funktion 1/X im In¬ 
tervall —5,5 plotten lassen 
und Sie geben als höchsten 
Y-Wert 10 an, dann werden al¬ 
le Werte, die größer als 10 
sind, weggelassen. Jetzt liegt 
der Wert F(X) = 10 am obe¬ 
ren Ende des Grafikbild¬ 
schirms und F(X) = —10 am 
unteren Ende. Dadurch wird 
die Funktion im Bereich der 
X-Achse nicht gestaucht. 
Falls der angegebene Y- 


Wert größer als der höchste 
Funktionswert ist, hat dieser 
keinen Einfluß auf den Aus¬ 
druck. Wenn Sie nur »RE¬ 
TURN« drücken, beträgt der 
höchste Y-Wert automatisch 
1000 . 

Abruf der grafischen Daten 

Nachdem die Funktion 
korrekt eingegeben wurde, 
braucht der Computer zirka 
2 bis 3 Minuten, bis er mit 
dem Plotten fertig ist. Da¬ 
nach drücken Sie bitte eine 
beliebige Taste. Es erschei¬ 
nen einige wichtige Informa¬ 
tionen und ein Menü. Auf 
Druck der entsprechenden 
Zahl wird das Erwünschte 
ausgeführt. Wir wollen uns 
jetzt nur der zweiten Mög¬ 
lichkeit zuwenden, da sich 
die anderen wohl selbst er¬ 
klären. Auf Druck der Taste 
2 erscheint ein weiteres Me¬ 
nü. Jetzt können Sie alle grafi¬ 
schen Daten errechnen-las¬ 
sen. Diese werden, wie unter 
Punkt 2,b erwähnt, nur in 
dem angegebenen Intervall, 
mit Ausnahme der speziel¬ 
len Funktionswerte, errech¬ 
net. Folgende Sonderfälle 
sind zu beschten. 

1. Absolute Extremwerte 

Diese können nur korrekt 

berechnet werden, wenn 
der höchste Y-Wert größer ist 
als der größte Funktions¬ 
wert. 

2. Fläche unter dem Gra¬ 
phen 

Der Computer gibt nicht 
wie bei der Integralrech¬ 
nung die Differenz der Flä¬ 
che zwischen dem Graphen 
und der X-Achse an, sondern 
den tatsächlichen absoluten 
Wert der Fläche. 

3. Spezielle Funktionswerte 

Falls Sie beim Abfragen ei¬ 
nes Funktionswertes genau 
eine Unendlichkeitsstelle 
oder eine nicht definierte 
Stelle erwischt haben soll¬ 
ten, gibt der Computer eine 
Null als Funktionswert an. 

(Jan Schaefer) 
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Programmbeschreibung 


prog 


87,88 

89-85 

96-98 

99-108 

109-180 


S05" 211 

£ 1*4-246 

214-830 

£ 3l-£40 

241-346 

£47-334 

£ 47-369 

£ 70-884 

285-333 

294-303 
303-317 

318,313 
320-360 


zeiiennummerr 
‘- 

Address® deS A ^° rS 

Ein9st ' äer Einheit" 

E1 " 9 des Drucici>«»*» b ‘ 

Eingabe de . +en Y-Werts 

Eingabe des boe- £ . ngaiben KorreKt 

^r:;r° r scMnen,Pr a ^ r ^^ h£e 

Ä: n n,.r- -::; d ri"-ne„ 

aue F — r und angescha ltet 

= S=russ‘=.-s 1TS-——— 

routine ® epl ° il&p i-tzen 

ans - 

s^TsS:r=- 

Ab-frage de 

rÄÄ.- 

Abfrage der ^ berechnet Ver + ahl ~ e n genaehert 

hie r wird . eC ht* sind 

Nullstellen aucn alJ , qe drucKt 

Nul istel len “ erde "- • t ive” Extremwerte 

r;Ä« , d ob ^-r c ; r ilc^chtelung 9 ®-e- 
Extremwerte werde 

S“ 9enae ~ 

Extremwerte wer und ftU sdrucK 

r^r::-Tr^.- — dsr 

“ngantäntr.pa^aaal Ra«* 

Naeharung des Fu „^lensuerten 

sr,“«rpi.-o- ; in* e u , ln . n 

□ da r Hasch .nens praan _- 
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4 

5 

6 
7 
S 

9 

10 
11 


REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 


DIESES PROGRAMM WURDE 19S3 ER¬ 
STELLT VON: 

*** ************* * 

*JAN SCHAEFER * 

* IN DER LOHN 9 * 


*5100 AACHEN 1 * 

*TEL.02408/3640 * 
***************** 
PQKE532B0,14:P0KE532B1,6:P0KE646,1 
PRINT "LSI K U R V E N D I S K U 


S I O N“ 


JAN SCHAEFER" 
A$ 


12 PRINT"® VON 

13 INPUT "FUNKTION FCX)=". 

14 I FA$= " " THENA*= " 1 " 

15 P0KE646,6 

16 PRINT"sMZODEFFNA CX5 = " ; A$ 

17 PR I NT " 21 AT= " CHR* (34) ATCHRT (34) !l 

18 PRINT"RUN20CCEC": 

19 P0KE631,13:P0KE632,13 sP0KE633,1 
634,13s POLE198,4:END 

20 DEFFNA (X) =X -V 2 

21 AT="X^2" 

22 P0KE646, 1: PR I NT" r TTTH" : C$= " 


23 F0RI=1T06:PRINTCT:NEXT 

24 pRiNT"nacrEnxr 

25 INPUT“»INTERVALL DER X-ACHSE (X1.X2) 

; n,i2 

26 IF12< = 11THENPRI NT ” £X3 
INPUT "EINHEITEN DER 
IFE X =OTHENEX=12—11 
INPUT" m INHEITEN DER Y-ACHSE";EY 


X 


GGT025 
-ACHSE";EX 


27 

28 

29 

30 PRINT"»SOLL DIE FUNKTION GEDRUCKT WER 
DEN <J/M>" 

31 GETD-T-: IFD$=" "THEN31 

32 PR I NT "EUT : FORI = 1 TO: 

NT "dXXT 


Listing »Kurvendiskussion» 

60 PRINT"gjSIND ALLE EINGABEN KORREKT <J/ 
N) " 

61 GETDT-: IFDT=" "THEN61 
IFD$="N"THEN11 
PR INT" LTD* 

REM POKEN DER MASCHINENROUTINE 

IFMP=iTHEN71 

FORI=0T064:READA:P0KE828+I,A:NEXT 
FORI=0T0651:READA:P0KE49152+1,A:NEXT 
P0KE768,87:PGKE769,168 
REM ERRECHNEN DER POSITION 

REM DER GERADEN 

IB=I2-I1:IFI1>0THENYA=0:B0T073 
YA=INT <319/IB*ABS(11) +.5) 

N=IB/319 

DIMK(325)sDIMNU(321):DIMNR(100):DIMRE 
(321) : DIliRR < 100) :DIMRM<321) 

75 WI=1E+38:WA=-WI 

F0RI=I1T0I2+NSTEPN 
J=J+1:K(J)=FNA(I) 

IFK(J)>WATHENWA=K(J) :MA=I 
IFK(J)< WITHENWI=K(J):MI = I 
NEXT 

IFWA>HXTHENWA=HX 
IFUJI <-HX THENW I=-HX 
IH=WA-WI 

IFWI>0THENXA=199;IH=WAsWI=0:G0TO88 
IFWA<0THENXA=0: IH=AE'S (WI) : G0T088 
XA=INT(199/IH*ABS(WA)+ = 5) 

REM STARTEN DES BITMAP-MODE 

V=53248:AD=S192:SYS828:POKE16701,VY:P 
GKEV+17,59:POKEV+24,24:P0KE53280,1 
89 REM ZEICHNEN DER GERADEN 

9^ FYA >319THENYA=319 


POKE 


62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 


76 

77 

78 

79 
BO 
81 
82 

83 

84 
S5 
86 

87 

88 


PRINTC*:NEXT:PRI 


91 IFYACÖTHENYA=0 

92 X=YA:Y=0:G0SUB313:POKE16704,PEEK 
2):SYS49575 

93 IFXA>199THENXA=199 

94 I FXA<OTHENXA=0 


1672 


33 I FDT-= " J " THEN35 

34 G0T057 

35 PD=1:E$="DIE FUNKTION WIRD" 

36 PRINT ,! SSSOLL DIE FUNKTION IN X-RICHTUM 
G VER-" 

37 PRINT"üBROESSERT WERDEN (J/N)?" 

38 BETD$:IFD$=""THEN3B 

39 I FD4-= ” N " THEN41 

40 E£=Eit+" IN X—RICHTUNG":VX=1 

41 PRINT" rrrm " : FORI = IT05: PRINTC-T: NEXTs P 
RINT-CUXm" 

42 PRINT"»SOLL DIE FUNKTION IN Y-RICHTUM 
G VER—" 

43 PRINT"®GROESSERT WERDEN (J/N)?" 

44 GETD*:IFDT=""THEN44 

45 IFD$="N"THEN49 

46 IFVX=OTHENE$=E$+" IN Y-RICHTUN8":GOTO 
48 

47 E$=E$+" UND":F4="IN Y—RICHTUNG " 

48 VY=255:AR=51 

49 IFVX=10RVY=255THENF$=F*+"VERGROESSERT 
GEPLOTTET.":G0T051 

50 ET-=E$+" GEPLOTTET." 

51 PRINT' TTm " 

52 IFVY=0THENAR=25 

53 F0RI=0T03:PRINTCT:NEXT 

54 FRiNT ,, rrrr ,, E$ 

55 IFF$=""THEN57 

56 PRINT"8S"F$ 

57 I NPUT "K-HOECHSTER Y-WERT";HX 

58 IFHX=0THENHX=100 

59 IFEY=OTHENEY=HX 


95 Y=XA:X=0:G0SUB318:SYS49604 

96 REM ZEICHNEN DER PFEILSPITZEN 

97 FORI=—7T07:Y=XA+I:X=319—ABS(I):G0SUB3 
18:NEXT 

98 F0RI=-7T07:Y=ABS(I):X=YA+I:B0SUB31B:N 
EXT 

99 REM ZEICHNEN DER EINHEITEN 

100 REM DER X-ACHSE 

101 D= <EX*31?>/IE: IFD<10THEN106 

102 FOR I =Y AT031 OSTEF’D: FQRÜ=-4T04: Y=X A+U: 
X=I+.5:60SUB318:NEXTU,I 

103 FORI=YATO1OSTEP-D:F0RU=-4T04:Y=XA+U: 
X=I+.5:G0SUB318:NEXTU,I 

104 REM ZEICHNEN DER EINHEITEN 

105 REM Y-ACHSE 

106 D=(EY*199)/IH;IFD<6THENU0 

107 FORI=XATO195STEPD:F0RU=-3T03:Y=I+.5: 
X=YA+U:G0SUB318:NEXTU,I 

108 FORI—XAT05STEP—D:F0RU=-3T03:Y=I+.5:X 
=YA+U:G0SUB318:NEXTU,I 

109 REM ZEICHNEN DER FUNKTION 

110 E=—199/1H:F=ABS(WI)*E+199 

111 F0RI=1T0319:X=I-1:Y=K(I)*E+F 

112 FL=FL+ABS(K(I));RO-RO+K(I)~2:RV=RV+K 
(I)*K(I+1) 

113 IFY >201ORY<OTHEN115 

114 SYS49629.Y+.5.X/B.XAND255:SYS49744.2 
'PEEK(16722) 

115 IFK2THENNEXT 

116 A=INT(Y+.5):D=K(1-1)*E+F:B=INT(D+.5) 

117 IFB<XAANDA >=XAORB= >XAANDA=<XATHENM-M 
+1:NU(M)=1*N+I1-N 
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C 64 


US C=K(I+1)*E+F:IFY>DftNDY=>CTHENT=T+l:R 
E(T> =I*N+I1-N:RM(T)=1: GOTO120 

119 IFY<DANDY=< CTHENT=T+1:RE(T)=I*N+11-N 
: RM(T) —0 

120 NEXT 

121 REM FLOTTEN DER FUNKTION 

122 IFPD=OTHEM154 

123 OPEN5,4,5: QPEN4,4: OPEN6,4,6: SYS49152 

124 PRINt#6,CHRf(20) 

125 PRIMT#4 

126 PR I NT#4 , CHRf (14) CHRf (14)" KURVEND 
ISKUSSION" 

127 PRINT#4 


12S PRINT#4,CHRf(14 5 " VON JAN 

SCHAFFER" 

129 PRINT44 

130 FORI=OTOAR: PRINT#6 , CHRf (20) :PRINT#4: 
PRINT#6,CHRf(0) 

131 F0RU=0T039 

132 I4="":IFPEEK<16705)-255THEN141 

133 F0RJ=0T07sA=PEEK<16709+J>sIf=I$+CHRf 
CA):NEXT J 


134 

135 

136 

137 
13B 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 
HMD 

150 

151 
IND 


Jf= ,! ";Cf ="" 

PRINT#5, If 

FORK=OTOU:Jf=Jf+Üt:Cf=" ":NEXTK 
IFVX=OTHEN140 

PR I MT#4, CHRf (14) Jf CHRf <254 > 

GOTO141 

PRIMT#4, JfCHRf (2545 
E=0:SYB49160:NEXTU,I 
F‘R I NT#6 , CHRf (20) 

PRINT44, 

PRINT#4, 

PR I NT#4, ” F < X > - " Af- 
PRIMT#4, 

PRINT#4,”INTERVALL VON "II” BIS "12 
PRINT44, 

F'RINT#4, "DIE EINHEITEN DER X-ACHSE B 
IM ABSTAND VON"EX"GESETZT NORDEN." 
PRINT44, 

PRINT#4, "DIE EINHEITEN DER Y-ACHSE S 
IM ABSTAND VON"EY"GESETZT WORDEN." 


Listing »Kurvendiskussion« (Fortsetzung) 


152 PRIMT#4 

153 PRINT#4,"DER H0ECH3TE Y-WERT IST"HX” 


154 BETDf: IFDf=" "THEN154 

155 PR I NT "5;.*” ; POKEV+17,27: PGKEV+24,21: POK 
E532QO,A:POKE53281.9 

156 PRINT"F(X)=”Af 

157 PRINT "ESI NTERVALL VON" 11 "BIS" 12 
153 PRINT"SEINHEITEN DER X-ACHSE : "EX 

159 PR INT "BSE I NHE I TEN DER Y-ACHSE : "EY 

160 PRINT"§SDER HOECHSTE Y-WERT IST”HX"." 

161 PRINT"®! DIE FUNKTION NOCHMAL SEHEN 


162 PRINT"12 GRAPHISCHE DATEN DER FUNKT 
ION" 

163 PRINT"ES3 NEUE FUNKTION EINGEBEN" 

164 PRINT"14 PROSRAMMENDE" 

165 GETDf:IFDf=""THEN165 

166 A=VAL(Df) 

167 GNA60T0169,172,170,171 

168 GOTO165 

169 P0KE251,0:SYSB62:POKEV+17,59:POKEV+2 
4,24:POKE532BO,1:GOTO154 

170 CLR:POKE76S,139:P0KE769,227:MP=1:GOT 
010 

171 PQKE76S,139:P0KE769,227:END 

172 P0KE532B1,2: P0KE53280,3: PR INT "Lj" j 

173 PRINT"11 NULLSTELLEN 

174 PRINT"12 RELATIVE EXTREMWERTE 


ABSOLUTE EXTREMWERTE 
FLAECHE UNTER DEM GRAPHEN 
VOLUMEN DES ROTATIONSKOERP 

SPEZIELLER FUNKTIONWERT 
RUECKSPRUNG INS HAUPTMENUE 


175 PRINT "m 

176 PRINT"14 

177 FRINT"15 
ERS 

178 PRINT"116 

179 PRINT"17 

180 PRINT"g"; 

181 GETDf: IFDT=" "THEN181 

182 A=VAL(Df):P0KE53280,1:PDKE53281,14:0 
NAGOTO184,215,247,286,295,303,155 

183 PDKE53281,2:PDKE53280,3:GOTO181 

184 REM NULLSTELLENBERECHNUNG 

IBS R=0:PRINT"OS NULLSTELLE 

N" 


186 IFPD=1THENPRINT#4sPRINT#4," 

NULLSTELLEN" 

187 IFM=ÖANDPD=1THENPRINT#4:PRINT#4,"KEI 
NE NULLSTELLEN" 

138 IFM=OTHENPRINT"®KEINE NULLSTELLEN":B 
0T0212 

189 FORI =1TOM 

190 N1=NU(I) 

191 F0RU=1TO10 

192 S=(FNA(NU(I) + (10""-S))-FNA(NU CI)))/10 
•--8 


193 IFABS(S)<IE-38THENG0T0195 

194 NU <I)=NU(I)-(FNA(NU(I)>)/S 

195 IFABS(NI—NU(1)5 >NORNl=NU(I)THENNU(I) 
=-1000:GOTO197 

196 NEXTU 

197 NEXTI 

198 F0RJ=1TOI:F0RU=J+1T0I 


199 IFJ=ITHEN204 

200 I' • BS (NU(J)-NU(U))<NTHENNU(U> =-1000 

201 NEXTU 

202 IFNU(J)=—1000THEN204 

203 R-R+1:NR(R)=NU(J) 

204 NEXTJ 


205 IFR=OANDPD=1THENPRINT#4:PRINTS4,"KEI 
fME NULLSTELLEN" 

206 IFR=OTHENPRINT"B9KEINE NULLSTELLEN" : G 
0T0212 

207 F0RI=1T0R 

208 NR(I)=INT(NR(I)*100+.5)/100 

209 IFPD=1THENPRINT#4:PRINT#4,I”. FUER X 
="NR(I) 

210 PRINT'W I”. FUER X = "NR(I ) 

211 NEXT 

212 BETDf:IFDf=""THEN212 

213 GOTO172 

214 REM RELATIVE EXTREMWERTE 

215 IFPD=1THENPR3NT#4:FRINT#4," 

RELATIVE EXTREMWERTE" 

216 PRINT " OS RELATIVE EXTREMWER 

TE” 

217 IFT=0ANDPD=1THENPRINT#4:PRINT#4,"KEI 
NE RELATIVEN EXTREMWERTE" 

218 IFT=OTHENPRINT"SKEINE RELATIVEN EXTR 
EMWERTE":G0T0212 

219 TS=T:FORI=1T0T 

220 A=FNA(RE <I)) 

221 B=FNA(RE(I)—N) 

222 C=FNA(RE(I)+N) 

223 IFABS(A-B)>IH/4THENTS=TS-1:RE(I)=—IO 
00 

224 IFABS(A-C)>IH/4THENTS=TS-1:RE(I)=-10 

00 

225 NEXT 

226 IFTS=OTHENT=0:G0T0217 

227 FORI=1TOT 

228 IFRE(I)=-1OO0THEN23O 
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Listing »Kurvendiskussion« (Fortsetzung) 


229 TT=TT +1: RE(TT)=RE <I) 

230 NEXT:T=TT:IFTT=0THEN217 

231 F0RI=1T0T:F0RU=0T06 

232 B=N/ 10"'"U 

233 F0RJ=1T010 

234 D=FNA£RE<I>+B> 

235 E=FNA(RE <I)> 

236 IFD>EANDRMCI)=OTHENRE <I>=RE(I> +Bs NEX 
TJ 

237 I FDKEANDRM (I) =OTHENRE £I) =RE (I) - B: NEX 
TJ 

238 IFDCEANDRM £ I) = 1THENRE (I) =RE (I) +E: NEX 
TJ 

239 IFD>EANDRM(I)=1THENRE <I)=RE(I)-B:NEX 
TJ 

240 NEXTU,I 

241 FORI=1 TOT 

242 A=FNA£RE(I)) 

243 A=INT < A*1000+.5)/1000:RE CI)=INT(RE CI 
)*1000+.5)/1000 

244 PR INT "ES" I " . FÜER F ( "RE < I > " > = " A 


283 IFPD=1THENPRINT#4:PRINT#4,"DAS ABSOL 
UTE MINIMUM LIEGT BEI F("AE(2)"5="A(2) 

284 G0TG212 

285 REM FLAECHENBERECHNUNG 

286 PRINT"US FLAECHE UNTER DEM GRA 

RHEN" 

287 IFPD=1THENPRINT#4:PRINT#4 ," FL 

AECHE UNTER DEM GRAPHEN" 

288 FL=FL-K(1) 

289 Fl=(K(1)+K(321))/2 

290 F2=(Fl+FL)*N:F2=INT(100*F2+.5)/100 

291 PRINT "ES A="F2 

292 I FPD=1 THENPR I NT#4: F’R I NT#4, " A=*'F2 

293 G0T0212 

294 REM ROTATIONSKOEPERBERECHNUNS 

295 PRINT"US VOLUMEN DES ROTATIONSKO 
ERPERS" 

296 IFPD=1THENPRINT#4:PRINT#4," VOLU 

MEN DES ROT ATIONSKOERPERS" 

297 R0=(RO-K(1) A 2)/2+<K(321) A 2+K£1) A 2)/4 
+ (R V) / 2 


245 IFPD=1THENPRINT#4;PRINT#4, I ”. FUER F 
("RE(I)")="A 

246 NEXT:G0T0212 

247 REM ABSOLUTE EXTREMWERTE 

248 PRINT"LSI ABSOLUTE EXTREMWER 

TE" 

249 IFPD=1THENPRINT#4;PRINT#4," 

ABSOLUTE EXTREMWERTE" 

250 AE (I)=MA:AE(2)=MI 

251 F0RI=1T02:F0RU=IT06 

252 B=N/10'"U 

253 FQRJ=1T010 

254 D=FNA(AE(I)+B) G4€R 

255 E=FNA(AE(1)5 

256 IFD<EANDI = ITHENAEC15 =AE(I)-B:NEXTJ 

257 IFD>EAND1 = 1THENAE£ I? =AE£ I)+B:NEXTJ 

258 IFD<EANDI=2THENAE£ I)=AE £ I)+B:NEXT J 


298 RO=RQ*ir*N 

299 R0=INT £ RO*100+.5)/100 

300 PR INT "ES V="RO 

301 IFPD=1THENPRINT#4:PRINT#4 5 " V=”RO 

302 G0T0212 

303 REM SPEZIELLE FUNKT IONSWERTE 

304 PRINT"UH SPEZIELLE FUNKTIONSW 

ERTE” 

305 IFPD=1THENPRINT#4:PRINT#4," S 

PEZIELLE FUNKTIONWERTE" 

306 PRINT"0FUER WELCHEN FUNKT SOLL DER F 
UNKIIns-” 

307 INPUT"gJWERT ERRECHNET WERDEN" ;A 

308 B=FNA(A):B=INT £ 1000*B+.5)/1000 

309 PRINT"« F £"A")="B 

310 IFPD=1THENPRINT#4:PRINT#4," F(”A")=" 
B 


259 IFD>EANDI=2THENAE(I)=AE(I)-BsNEXTJ 

260 NEXTU,I 

261 IFAE(1)>I2THENAE <1)=12 

262 IFAE <1X11 THENAE (1) = 11 

263 IFAE (2X11 THENAE £2) =11 

264 IFAE(2)>12THENAE£ 2)=12 

265 F0RI=1T02 

267 A £ I)=FNA(AE(15) 

268 A(I)=INT(A £ I> *1000+.5)/1000:AE £ I)= IN 
T(AE(I)*1000+.5)/lOOO 

269 NEXT 

270 IFABS(A(1))>HXTHENPRINT"@8DAS ABSOLUT 
E MAXIMUM KANN NICHT BESTIMMTßSWERDEN» '• 

271 IFABS (A £ 1) ) >HXANDF'D=1 THENPR INT#4 , 

272 IFABS (Ad ) ) >HXANDPD=1 THENPR INT#4, "DA 
S ABSOLUTE MAXIMUM KANN NICHT BESTIMMT W 
ERDEN." 

273»IFABS(A(1))>HXTHEN277 

274 F'RINT"i£DAS ABSOLUTE MAXIMUM LIEGT BE 

T " 

275 PR I NT " iSF ( " AE (1) " ) = " A ( 1) 

276 IFPD=1THENPRINT#4s PRINT#4,"DAS ABSOL 
UTE MAXIMUM LIEGT BEI F("AE £ 1)")="A(1) 

277 IFABS (A (2) ) >HX THENPR INT "EID AS ABSOLUT 
E MINIMUM KANN NICHT BESTIMMT|ß3WERDEN. " 

278 IFABS(A(2))>HXANDPD=1THENPRINT#4 

279 IFABS(A(2))>HXANDPD=1THENPRINT#4,"DA 
S ABSOLUTE MINIMUM KANN NICHT BESTIMMT W 
ERDEN." 

280 IFABS(A(2))>HXTHEN212 

281 PRINT"3SDAS ABSOLUTE MINIMUM LIEGT BE 
I" 

2S2 PRINT"EF£"AE<2)")="A<2> 


311 PRINT"EMOCH EINEN ?" 

312 GETDT:IFDT=""THEN312 

313 IFDT="N"THEN172 

314 PRINT" [XD" : F0RI=0T02: F'RINTCT: NEXT: FR 
INX'ITU” : G0T0306 

315 PRINT"SSIN DEM PUNKT"A"KANN KEIN FUNK 
TIONSWERT BESTIMMT WERDEN !" 

316 IFPD=1THENPRINT#4:PRINT"IN DEM PUNKT 
"A"KANN KEIN FUNKTIONSWERT BESTIMMT WERD 
EN ! " 

317 G0T0311 

318 IFY >2010RY<00RX<OORX >319THENRETURN 

319 SYS49629,Y f X/8,XAND255:SYS49744,2'PE 
EK(16722):RETURN 

320 DATA169,32,133,252,169,0,133,251,169 
,0,162,0,160,255,145,251,136,145,251 

321 DATA240,3,76,76,3,230,252,232,224,34 
,240,3,76,72,3,169,4,133,252,169,1,162 

322 DATAO,160,255,145,251,136,145,251,24 
0,3,76,106,3,230,252,232,224,4,240,3 

323 DATA76,102,3,96 

324 DATA169,32,133,252,169,0,133,251,160 
,B,169,0,153,68,65,136,20B,250,160 

325 DATAO,162,8,177,251,141,60,65,173,60 
,65,74,141,60,65,144,9,1B9,68,65,24 

326 DATA105,128,157,68,65,202,208,235,17 
4,61,65,224,255,240,1,200,162,8,177 

327 DATA251,141,60,65,173,60,65,74,141,6 
0,65,144,9,189,68,65,24,105,64,157 

328 DATA68,65,202,208,235,200,162,8,177, 
251,141,60,65,173,60,65,74,141,60,65 

329 DATA144,9,189,68,65,24,105,32,157,68 
,65,202,208,235,174,61,65,224,255,240 


120 
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Auf dem VC 1526 erstellte Hardcopy 



330 DATA1,200,162,8,177,251,141,60,65,17 
3,60,41S, 74,141,60,65,144,9,189,68,65 

331 DATA24,105,16,157,68,65,202,208,235, 

200.162.8.177.251.141.60.65.173.60 

332 DATA65,74,141,60,65,144,9,189,68,65, 
24,105,%,!57,68,65,202,208,235,174 

333 DATA61,65,224,255,240,1,200,162,8,17 

7.251.141.60.65.173.60.65.74.141.60 

334 DATA65,144,9,189,68,65,24,105,4,157, 

65.65.202.208.235.200.162.8.177.251 

335 DATA141,60,65,173,60,65,74,141,60,65 
,144,9,189,68,65,24,105,2,157,68,65 

336 DATA202,208,235,174,61,65,224,255,24 
O,1,200,162,S,177,251,141,60,65,173 

337 DATA60,65,74,141,60,65,144,9,189,68, 
65,24,105,1,157,6B,65,202,208,235,24 

338 DATA165,251,105,8,133,251,165,252,10 
5,0,133,252,174,61,65,224,255,240,3 

339 DATA76,141,193,174,62,65,224,255,240 
,11,169,0,133,253,133,254,169,255,141 

340 DATA62,65,24,165,253,105,8,133,253,1 
65,254,105,0,133,254,166,253,224,64 

341 DATA208,58,166,254,224,1,208,52,56,1 
65,251,233,60,133,251,165,252,233,1 

342 DATA133,252,169,0,133,253,133,254,17 
4,63,65,224,255,208,21,169,0,141,63 

343 DATA65,24,165,251,105,56,133,251,165 
,252,105,1,133,252,76,141,193,169,255 

344 DATA141,63,65 

345 DATA160,8,136,185,69,65,201,0,208,10 
,192,0,208,244,169,255,141,65,65,96 

346 DATA169,0,141,65,65,96 

347 DATA162,25,173,64,65,160,8^136,145,2 

51.208.251.24.165.251.105.64.133.251 

348 DATA165,252,105,1,133,252,202,208,23 
0,96 

349 DATA162,40,160,0,169,255,145,251,24, 


Listing »Kurvendiskussion« (Ende) 

165,251,105,8,133,251,165,252,105,0 

350 DATA133,252,202,208,236,96 

351 DATA32,253,174,32,158,183,142,76,65, 
32,253,174,32, 158, 183, 142', 77,65,32 

352 DATA253,174,32,158,183,142,82,65,173 
,76,65,41,248,141,78,65,169,40,141 

353 DATA79,65,32,99,194,173,76,65,41,7,2 
4,109,80,65,133,251,173,81,65,105,0 

354 DATA 133,252, 173,77,65, 141,7/8,65, 169, 
8,141,79,65,32,99,194,24 

355 DATA173,80,65,101,251,133,251,173,81 
,65,101,252 

356 DATAl33,252,24,165,252,105,32,133 

357 DATA252,173,82,65,41,7,141,82,65,169 
,7,56,237,82,65,141,82,65,96,32,253 

358 DATA174,32,158,183,142,82,65,160,0,1 
77,251,13,32,65,145,251,96,169,0,141 

359 DATABO,65,141,81,65,162,9,24,202,110 
,81,65,110,80,65,224,0,240,18,110,78 

360 DATA65,144,240,173,81,65,24,109,79,6 
5,141,81,65,76,110,194,96 

READY. 


Ladeprogramm »Kurvendiskussion« 

10 POKE1 6900 ,O sPOKE16899,0 s POKE16898,Q:P 
QKE43, 4 : P0KE44 , 66 
20 PRINT"ÜBNEW” 

30 PRINT"SOS-OAD"CHRT(34)"KURVENDISKUSSIO 
WEHRT (34) " , 8" 

50 P0KE631,13:P0KE632,13:P0KE633,13:POKE 

i 1 

READY. 


* ncter. Variablem 

wichtigsten_ 


- „iigrenze 

l 1 "** ’"Urva 119 ^ 

rechte I x-W se 


rechte *_Achse 

Eiritie ' teri -Y-pcri&e 

Einheiten der 

^ .., + o r m 


FunKtionster er Ja/Nei g? 

^ £drUCK K tergroessert m * _* . chtung 7 

ftusa ;; C c , vergroeR^^ ir ‘ 
hster Y-Wert 

H ° e der Y-ftch^ 

La9 * d(=r X- 6 chse 
Lage aer 

FunKt ionswerte 

R elati^s we rte 

Absolute Extr 
Maximum 

Minimum yl C . 

e*,ica«ir«‘^ e Qr d a e phlKbi i d 5 chirm S 
An-fang de * de m Graphen 

Freche ^ Ro tat ionsKoerPers 

VolU ^" ld# Wald und Wiesen 

K E ' F L h i F e %enuarUbl- 
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Rätsel 


VC 20 


Rätsel - ein 
Knobelprogramm 



Sicher kennen Sie die Rätsel, bei 
denen man aus einem Buchstabensalat 
bestimmte Wörter heraussuchen muß. 
Dies ist nicht immer einfach, zumal die 
Wörter auch rückwärts oder diagonal 
angeordnet sein können. Solche Rätsel 
können Sie nun mit dem VC 20 selbst 
erstellen. 


Das Programm Rätsel 
bringt 440 Buchstaben bunt 
durcheinander auf den Bild¬ 
schirm. In diesem Buchsta¬ 
bensalat sind Wörter ver¬ 
steckt, deren Anzahl zuvor 
bestimmt werden kann (Zei¬ 
le 35). 

Die Suche ist nicht ein¬ 
fach, weil die Wörter zufäl¬ 
lig verteilt (Zeile 130) kreuz 
und quer, diagonal und zum 
Teil auch rückwärts ge¬ 
schrieben werden (Zeilen 
100 bis 120 drehen dafür et¬ 
wa jedes vierte Wort 
herum). 


Richtig gefundene Wörter 
werden im Buchstabensalat 
schwarz gedruckt. Wer vor 
der Aufgabe kapituliert, 
kann sich mit der Taste x die 
Lösung zeigen lassen. 

Das Programm schreibt 
die zu versteckenden Wör¬ 
ter zuerst in das Feld F$ 
(22,20). Zugleich wird im 
Feld FF$ (22,20) registriert, 
welche Zeichen belegt sind. 

Der Programmlauf wird 
im übrigen aus den einge¬ 
fügten REM-Zeilen ver¬ 
ständlich. 

(Jürgen Curdt) 


1 REf1"£_." =CLEAR HONE " ST =CORSGR HONE 

2 REN"g_j'CURSOR HOCH "GL"=CURSOR RUNTER 

3 REN" JJ' "CURSOR RECHTS ' V =CURSOR LINKS 

4 REN "e_"=SCHWARZ "EJ'=WEISS "^ROT 

10 REN NOERTERSUCHE IN BUCHSTABENSALAT 

15 REM JUERGEN CURDT,KESSEHEIERWEG 3,+33 

DETNOLD »TEL 67264 

20 P0KE36879,93:PRINT" s_ET J : FORI =0TO439: P 
RINTCHRiCRNDC1 3*26+65 );:NEXT 
25 PRINT"a^QCQHiIXUERSTECKElQFQ A UGLc£Q^R 
O^" s PRINT" ]gqqqP Tr.HQQKRFU71 lUNn aa^^^ 
i /y ( 0 q^i inn yR 

30 PR I NT"WOERTERIAQUQCQH":PR I NT" QQQQJ 3 3] 
11)9.1 g_Agi3gJOg_NgjAgi.- SQQQQQQQQ . QQQQQQQQ QQj3" 

35 PRINT" 2AHL DER UERSTECKTEN UIOERTER 

(2-20)";:INPUTKi 

40 POKE1000,UAL(. RIGHT iCKi ,2)) 

45 K=PEEKC 1000 ): DTNF$(22,20 ); DINFF^-C 22,2 
0):DINNiCK+l):DINNU$C20 ) 

50 FORI=1T0K+1;N$CI )--"0"; NEXT 
55 LEi="SQ QQQQQQQQQQQQQQQQQQ Q 

999 !' 

60 PRINTLEi"QQ_ BITTE ETUAS WARTEN 8S2‘ > 

65 REN EINSPRUNG IN DIE UOERTERLISTE 
70 FORI=0TOINT CRNDC13*503: READNi:IFNi="x 
*x"THENRESTORE:GOTO70 
75 NEXT 

80 REN NOERTER NAEHLEN - N$ - UND IN DAS 


FELD -Ni ,X,V- SCHREIBEN 
35 KL =KL+1 
90 IFKDKTHEN520 

95 FORI=0TOINTCRNDC1 )x5):READNi:IFNi="x* 
*"THENRESTORE:G0T095 

100 NEXT:NiCKL 3=N$:LN=LENCNi):ONINTCRNDC 

1 )x4+1 3GOTO110,130:GOTO130 

105 REN NORT HERUNDREHEN 

110 FORI=1TOLN:NUiCI3=NIDiCNi,1,13sNEXT 

115 Ni-"" 

120 FORI=LNT01STEP-1:Ni=Ni+NUiCI ):NEXT 
125 REN WAAGERECHT,SENKRECHT ODER DI AGON 
AL 

130 ONINTCRNDC13x6+13GOTO 135,210,285,36 
5,440,480 

135 REN SPALTEN ABN. 

140 I=INTCRNDC13x22):J =0 

145 IFFiCI,J 3 = ""ANDJ <19THENJ =J + 1:GQT0145 

150 IFJ =>LNTHEND=J-LN:AN = INTCRNDC1 )xD):G 

0TG195 

155 REN KREUZUNG SUCHEN 
160 L = 1:Uli=FiCI ,J 3 

165 U2i=MID$CN$ ,L,1 ): IFUliOU2iTHENL-"-L + l 
:GOTOl75 

170 J1=J+1:G0T0185 
175 IFL<LNTHEN165 
180 G0T095 

185 IFFiCI,J13 = ""ANDJ 1<19THENJ1=J1+1sGOT 
0185 

190 AN=J-L+l:IFAN<0ORJ1-AN<LNTHEN95 
195 FORJ =ANTOAN+LN-l 

200 Fi CI ,J3 =N I Di (Ni , (. J-AN 3+1,1 ):FF*CI,J 3 
"Ki- NEXT 
205 GOTO80 

210 REN SPALTEN AUFU . 

215 I=INTCRNDC13x22): J=19 

220 IFFiCI,J 3 = ""ANDJ >0THENJ = J -1:GOTO220 

225 IF19-J >=LNTHEND = 20-J-LN: AN=INT CRNDC1 

3xD)+J+l:GOTO270 

230 REN KREUZUNG SUCHEN 

235 L = 1:Uli=FiCI ,J 3 

240 U2i=NIDiCNi ,L , 1 ): IFUliOU2iTHENL=L+l 
“GOTO250 

245 J1=J-1:GOTO260 
IFL<LNTHEN240 
G0T095 

IFFICI,J1 3 =' "ONDJ1>0THENJ1=Jl-l:GOTO 


250 

255 

260 

260 

265 

N95 

270 

275 


AN=J-L+1: IFAN<0ORAN+LN>190RJ- J 1 <LTHF. 


FORJ =ANTOAN+LN-l 

Fi CI ,J3-NIDiCNi,CJ-AN 3+1 ,1]:FF*CI,J 3 
"KL-NEXT 
280 GOTO80 
285 REN ZEILEN N.R. 

290 J.-INTCRNDC1 3*19): 1=0 

295 IFFiCI,J3=""ANDI<21THENI=I+1:G0T0295 

300 IFI=>LNTHEND=I-LN:AN=INTCRNDC13xD):G 

OTO350 

305 REN KREUZUNG SUCHEN 
310 L = 1;U1$--F$CI J 3 

315 U2i-~NIDiCNi ,L , 1 ): IFU1 i<>U2iTHENL=L+1 

•- G0T0325 

320 G0T0335 

325 IFL<LNTHEN315 

330 G0T095 

335 11=1+1 

340 IFFiCIl,J )=""ANDI1<21THENI1=11 + 1iGOT 
0340 


122 üdLü* 


64vr-onllDo.il« 
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VC 20 


Rätsel 


345 AN = I-L+l • IFAN<0ORI1-AN<LNTHEN95 
350 FORI=ANTOAN+LN~l 

355 FtCI,J 3=MIDtCN$,fI-AN 3+1,13-I,J 3 

-KLJNEXT 

360 GOTO80 

365 REN ZEILEN N.L. 

370 J=INTCRNDC1 3*203: 1 =21 

375 IFFtCI ,J 3 = " " ANDI >0THENI =1-1 :G0T0375 

380 IF21-I>=LNTHEND-22-I-LN:^N=INTCRNDC1 

3*D3+1+1:G0T0425 

385 REN KREUZUNG SUCHEN 

390 L=1:U1$=F*CI,J3 

395 U2$=NID$CN£ ,L,13: IFU1£<>U2$THENL=L+1 
:GOTO405 

400 J1=1-1:G0T0415 
405 I FL <LNTHF.N395 
410 G0T095 

415 IFFiCJl ,J 3 = ""ANDJ1>0THENJ1=J1-1: GOTO 
415 

420 AN=I-L+1:IFAN<0ORAN+LN>21ORI-J1CLTHE 
N95 

425 FORI=ANT0AN+LN~1 

430 Ft CI,J3=MID£CNi,CI-AN D+l,1D:FFxCI ,J 3 

=KL:NEXT 

435 GOTO80 

440 REN DIAG.LU-RO 

445 J = INTf.RNDC 1 3*C19-LN 3 3+LN: AN = INTCRNDC 
1 3XC23-LN DDi J2=Ji I2=AN 

450 IFJ 2>0AND12 <22ANDFt C12 , J2] =.THENJ2 = 

J 2—1:12 = 12+1:GOTO450 
455 IFJ-J2<LNTHEN135 
460 FORI=ANTOAN+LN-l 
^65 FtC I , J 3=MIDtCNt,I-AN+1,13:FF%CI,J 
L: J =J —1 
470 NEXT 
475 GOTO80 
480 REN DIAG.LO--RU 

485 J =INTf.RNDC 1 D*C20~LN D D. AN=INTCRNDC 1 3* 
C23-LNDD: J2=J: I2=AN 

490 IFJ2<20ANDI2<22ANDFt C12 , J 2 3 =. rhFNJ2 

=J2+Ü 12 = 12+1 ;GOTO490 
495 IFJ 2-J<LNTHEN285 
500 FORI=ANTOAN+LN-l 

505 FtC I J 3=MIDtCN$,I-AN+1,13:PF%CI,J 3=K 
L: J=J + 1 
510 NEXT 
515 GOT080 

520 REM RAETSEL AUSGEBEN 
525 PRINT"SECi:FORJ=0TO19:FORI=0TO21 
530 IFFtCI,J D = ""THENFtCI,J 3=CHR£CRNDC13* 
26+65 3 

535 PRINTFtCI ,J 3; 

540 NEXTI,J 

545 REN EINGABE ABWARTEN 
550 PRINTLEfQ. b.SUCHE"K"UOERTER UND 

TIPPE SIE EIN 33.": • p OKE 198,0 
555 EIt: WA IT 198,1: p RINTLEt 
560 GETEt:IFEt=""THEN560 
565 IFE$=CHR$ C13 3THEN585 
570 IFE$="x"THEN665 

575 IFEt=CHRtC20 3THENEI*=LEFT*CE II ,LENCE 
HH D: PRINT-a. a" i ■ GOTO560 
580 Elt =EIt+Et:PRINTEt- :GOTO560 
585 FGRKL = 1T0K; IFEItONtCKL 3THENNF.XT: GOT 
0595 

590 GOTO605 

595 PRINTLE*;PRINT" LEIDER NICHT RICHTIG 

lOESUNG.. 

600 GOTG555 


605 R=R+1 

610 REN GEFUNDENES WORT SCHWARZ SCHREIBE 
N 

615 PRINT S": :PORJ=0TO19;FORI =0TO21 

620 IFFF'M I , J 3=KLTHENPRINTFt CI ,J 3; . G0T06 

30 

625 PR INT"IT 

630 NEXTI,J: TFR=KTHEN645 

635 PRINTLEt: PRINTR+l; "a- HORTPS!': 

640 Nt CKL 3 = "":G0T0555 

645 PRINTLEi" xxx FEIN GENACHT xxx 

NEUES SPIEL ?"; 

650 POKE198,0.WA IT198,1 

660 PRINTLEt::RUN45 

665 REM LOESUNG GEBEN 

670 PRINT'SdJ' : s roRJ =0TO19; ^ORI =0TO21 

675 IFFF^-C I „J 3>0THENPRINTF$C I , J 3; : G0T06 85 

680 PRINT"!: 1 : 

685 NEXTI ,J 

690 PRINT" NEUES SPIEL ? TASTE D 

RUECKEN !"; 

695 GOTO650 

700 DATAREGENWURN .UEBERFLUSS.UORGARTEN,A 
PFELSAFT .FEUERWEHR,MORGENSTERN,ABENDROT 
705 DATAAFFENHAUS .POLTERGEIST.LOGISCH.DO 
RFPLATZ .GASTHAUS .STEINKOHLE.REGENSCHIRM 

READY . 

1000 DATA"xxx" 

1010 REM ZWISCHEN 700 UND 999 KOENNEN BE 
lIEBIGE WOERTER EINGEFUEGT WERDEN 

READY+-*— 


Listing des Programms »Rätsel« 
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KNICKER 

ZWERCHFELL 









WESTEN FERKEL SAUBOHNE 
TINTENFISCH TISCHLER ACHAT 
SCHREIBHEFT KANINCHEN HERBSTLAUB 
lIBELLE TRABER MESSER 
LEUCHTER 

WOERTERSUCHE IM BUCHSTABENSALAT 
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Hardcopy des Bildschirms als Beispiel. Die unten stehenden Wörter sind im Salat 
versteckt, versuchen Sie diese zu finden. 


64 «r-onllii 9 , 4 t 
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Dieses Spiel zeigt die Möglichkeiten, 
die bereits in der Grundversion des 
VC 20 stecken. Obwohl von den 
Farbgrafik- und Soundmöglichkeiten 
ausgiebig Gebrauch gemacht wird, 
benötigt das Programm nur 
knapp 3 KByte 
RAM. 




> 10 ' 


Ein 


Action-! 
für den 
VC 20 


10 
12 

19-99 
100 - 13 0 
200-206 
250-292 
300 - 3i 4 
I000-ioi 2 
1100-1107 


F eindliche Weltraumschif¬ 
fe greifen die Erde an! Sie 
haben in diesem Spiel die 
Aufgabe, die Invasion abzu¬ 
wehren. Dazu besitzen Sie 
ein Raumschiff, den »Crous- 
saider«, das über der Erde 
schwebt. Unter ihm liegt eine 
moderne Stadt mit Hochhäu¬ 
sern, Fabriken und einem 
Atomkraftwerk. Am oberen 
Rand des Bildschirms er¬ 
scheinen die Angreifer, de¬ 
ren Ziel es ist, in der Stadt zu 
landen und sie zu zerstören. 


Hnlesef derGnfk inenpr °3am 

Gr *fik-DATA P he ' D ATA 

£££££ ^sm***** 


ms 


von 


zwischen 1 


1 REM CROUSSRIDER 

3 REM 

4 REM 

10 FURfl=yTU164 
12 FORJ=0TO159 


und 2 


Sie bewegen sich rasch auf 
die Stadt zu, so daß schnelle 
Reaktionen erforderlich 
sind, um eine Landung zu 
verhindern. 

Hat man es geschafft, den 
Angreifern eine bestimmte 
Zeit zu widerstehen, er¬ 
scheint eine neue, gefährli¬ 
chere Welle von Invasoren 
mit anderem Aussehen. 

Wenn man fünf verschie¬ 
dene Angriffswellen über¬ 
steht, erscheint wieder die 
erste, mit dem Unterschied, 
daß die Angreiferzahl steigt. 
So ist immer für Abwechs¬ 
lung und Spannung gesorgt. 

Der fortgeschrittene Spie¬ 
ler, dem das Spiel zu einfach 
ist, kann den Wert der Varia¬ 
blen Y in Zeile 10 ver¬ 
mindern. 

Um das Spiel zu beschleu¬ 
nigen, wurden einige Routi¬ 
nen in Maschinensprache 
geschrieben. Die erreichte 
Punktzahl wird ständig ange¬ 
zeigt, und eine »High-Score#- 
Fuhktion hält das jeweils be¬ 
ste Ergebnis fest. 

Doch damit genug der Vor¬ 
rede. Tippen Sie doch jetzt 
einfach das Listing ab und 
versuchen Sie, die Invasion 

zu verhindern ... 

(Eberhard Aust) 


• RE fl I'E • PQKE828+R, E '• HEXT ■ FÜR J=@T041: RE fl DK • PÜKE7440+J, K ' HEXT 
REflUK : PÜKE71S8-I-J, !<: HEXT '■ FÜRJ-0TO7 • PQKE7168+32*8+J, 0 : HEXT 
1 3 P0KE36873 ,3 ■ FR I NT" TMüffüMP,!" : fl“8086 : B-8878 : 08035 '• SC--0 : X--8 

20 POKE36863, 255 : P0KE36878,15- PÜKE7432,8 : PÜKE7433,0: V=10: N=36876 : LI. = 10 : IFQQ-ÖTHE 
H280 

75 FORRR-0T044 PR I NT " lil "; : NEXT : PRI NT " 

II 

80 PRINT"P L. kQ P Qi»l LL PLI. LLLPLLLSMMfcJSÜLORifiLLLLLLLL 

II • 

30 PR INT" Bt^MNHNNNNNNbiNNNNNNNNMNis8 ,> • PÜKE7680+505, 14: PÜKE384Ö0+505,5 

31 POKER-1,3: POKER, 1 ü • P0KER+1 .• 11 : GOSUB300 

100 E”PEEK'(37151 ■ PÜKE37154, 127 • F=PEEK(37152) ; P0KE37154,255 ■ D*INTCRND(1 )*2)+l ; PO 
KEN.- S+D • 

1 83 IF <EflND1 6 > = 0 fl MD fl> B THE NPÜK Efl+ 1 , 3T PÜKEfl,32 •fi=R-D -POKER-1 ,9 ■ POKER , 10 : POKER + 1 , 1 
1 : F'OKEN, R 

104 IFCFRND128)=0flNDfl<CTHENPOKER-l, 32 = PÜKEfl.■ 32 = R=fl+D : POKER+T .. 11: POKER, 10: POKER-1 

, 3 ; POKENT Listing »CroussaideD» 


























106 P0KE36877,0 ; SVS303 : IF<ERND32> «0THENPOKEfl~22,8 : P0KE36877,252+D 

111 IFI NT < RND < 1 ? *V) =0THEN I = I NT < RND '• 1 > * 14 ) +7723 : POKEI -1, J POKEI , K : POKEI +1 .• L 

120 3VS828 : SVS828+51 : IFPEEK< 7432> O8THENÜÜ3UB200 

121 X FPEEK<7433><>0T HENGÜTQ258 

127 U=U+1:IFU--1THENSVS7448 : IFTI>2000THENGQSUB308 

129 PR INT" SC : I FU“2THENSVS < 7461) : IJ=0 

130 SVS903 : GOTO108 

200 FORH~0TO13:POKE36373,INT< RND<1)*256)•NEKT:PQKE36879,9 

201 H=PEEK<7432 >:P0KE36877,INT<RND<1>*90> +128•PÜKE7432,8 = 1FH=8THENSOSC+1Ö : RETUR 

N 

202 IFH=20RH=4THENSC~SC+40: RETURN 

203 IFH«3THEHSC~SC +1 NT < RND < 1 > * 120 > • RETURN 

204 IF H=5THEM3C=SC+75•RETURN 

205 IFH«1THEMS0«SC+2Ö•RETURN 

206 RETURN 

250 m i nt " k. m s fe l_ ssssair-isnyj:^a©o q mtBssss? l ss 11 ; 

252 POKEN,Ö:POKEN+1,128 : FORLN15TO08TEP--1 : PÜKEN+2,U : FORUU=0TO40 : PQKEN+3,INT<RND<1 
)*128> : NE KT:HEKT 
273 IFSOHI THENN I==SC 

280 P0KE36873,3 • PR I NT ” '»«SÜHSb»W niaiST HI : PRINT M ^a««PT»»»»illCROUSSRIDER'J!»liiBMiME. 
RUST" 

281 GETR$ : Q.Q« 1 = I Fft$«" "THEN281 S4f£R ODLirn^< 

282 GOTO13 

300 TI$«"800000" •• K=K+1: S=220+X*3 : R«$.10 : T«S+18 : IFtt=6THENY=Y-l ■ X«1 • IFV<3THENV«3 

310 I FX« 1 TUEN J=32 ; K« 1 : L=32 :2«V : RETURN 

311 I FK«2THEHJ-'0 * K«32 : L=0 • Z=Y ' RETURN 

312 I FN=3THEN J«2: K=3: L «4 •' Z=Y*2 ; RETURN 

313 IFX«4THENJ=1 : -K==8 : L=1 : Z=V*1.5 ; RETURN 

314 I FX=5THENJ«2 : K«3 • L«4 '• Z=V* 1.5-RETURN 

1000 DR TR 162, 228, 183, @, 31,201,8.. 16, 8, 157,22,31, 163,32, 157,9, 31,224,0, 240, 4,282,7 
6 .• 62 , 3 

1001 DR TR 162233, 183,22.« 38,281,8, 16,8,157,44, 3Ö, 163,32, 157,22, 30,224,0,240,4,202 

.• r' 6, 8 7 , 3 

1082 DAT ft 96, 162,9, 1 89, 184,31,201,8,48 .• ’i 
.126,3 

1003 DRTR162,0,133,22,38,281,8,208,20,: 

, 30 

1004 DRTfl169,32,157,22,30,224,255,248,4,232,76,137,3 

1006 DRT fl 162,0,189,22, 31,291,8., 208, 28, 

1007 DRTfl8,23,152,157,0,31,163,32,157,; 

1098 DAT'ft162,0,163,32,157,22,38,232,22- 
1003 DRTR169,126,141,4,28,169,36,141,5 
1010 DRTR 163,102,141,4,28,169,68,141,5 

1100 DRTRS0,126,213,255,102,60•66,129, i 

1101 DRT fl 128,128,231,153,252,252, 191,1: 

63,63 

1102 DHTR255,,,,,,,,,,,,,,, , ,,,, , , , , , ,' 

1104 DAT fl 255, 165,127, 36,66,36,68, 24, 12i 

1105 DAT ft 255165,255, 165,255, 165, 255, 11 
5,255 


24,43,24 

0 ,4 

, 2 : 


, 76, 1 

13,3 

, 96, 

142. 

: y 

, 29 

, 76 

, 189 

,8,3 

0 , 2 ' 

01 

, y 

, 16,3 

, 141 

O «5. 

9, 152 

■i er 
j. 

7, @. 

_ “7| 

6, 13 

7 O 

i .* •-.* 










!, 139 

, 0,3 

j. .« uD 

01 

c* 

, 16,3 

, 141 






31,2; 

24,2 

00, 

ei 

0.« 

4,232 

, 76, 

174, 





2,24 

0,3, 

76 - 

211, 

3, 36 







1.69 

, 36 , 

141 

, 6 


8, 163 

, 24, 

141, 

7 : 2' 

3, 

96 


:, 163 

, 66, 

141 

,6 

.• c:. 

8, 169 

, 123 

, 141 

, r, i 


, 36 


36,2 

4, 12 

6, 1 

65 

.« 1 

26,24 

J 






, 126 

, 255 

*-» t- nn* 

.« iZ. J •_.* .* 

SS 

, 66,2 

55,2 

55, 1 

, 1, 

IC, 

'T, , O 

49 , 

i, 28, 

d'dci 

t 

P, 

20 

, 54, , 

24, 1 

26,165 




155,2 

31, , 

, 24 

, i 

26 

, 165, 

255, 

165, 

254 

1 

6 


4, 14 

, 14, 

31, 

O .i. 

• ! .M» 

1,4, 4 


, 255 

, 25! 

•;i, 

255 

1 25 

126, 

102, 

102 

, 102 

, 102, 

102, 

102, 

102 

, 1 02 


>, 12 t, 

, 126 

•“i er 

er 

, , 

, , , 52 

, 126 

, 255 






READY. 


Listing »Croussaider» (Schluß) 







































C 64/VC 20 


Tips & Tricks 


Mehr über SYS 


Der SYS-Befehl beim C 64 und VC 20 
leistet wesentlich mehr, als das 
Commodore-Handbuch zugeben will. 

Er bietet zum Beispiel eine einfache 
Möglichkeit, Parameter an Maschinen¬ 
programme zu übergeben. 



D er SYS-Befehl hat folgen¬ 
des Format: 

SYS <Adreßausdruck> 

[, < Parameterausdrücke > ] 
SYS ruft das Maschinen- 
sprachprogramm auf, das 
bei »Adreßausdruck« lo¬ 
gisch beginnt. »Adreßaus¬ 
druck« steht für eine RAM- 
Adresse im Bereich von 0 bis 
65535. 

Die wahlweise anzugeben¬ 
den Übergabeparameter 
werden nicht von SYS bear¬ 
beitet, vielmehr müssen die¬ 
se Angaben in geeigneter 
Weise vom aufgerufenen 
Maschinenprogramm aus¬ 
gewertet werden. Hierzu 
sind natürlich genauere 
Kenntnisse in Assembler- 
Programmierung erforder¬ 
lich. • 




Es kann jedoch eine ande¬ 
re Übergabeform gewählt 
werden, auch wenn dies im 
VC 20-Programmierhand- 
buch verschwiegen und im 
Handbuch das Gegenteil 
behauptet wird. 

Diese Form der Parame¬ 
ter-Übergabe besteht darin, 
Akkumulator, X- und Y-Regi- 
ster sowie den Prozessorsta¬ 
tus vorzugeben. 

Wie soll das vom Basic aus 
geschehen? Wenn nicht di¬ 


rekt, dann eben über die 
Speicherstellen, die SYS als 
oben genannte Register auf¬ 
nimmt, bevor ins Maschinen¬ 
programm verzweigt wird, 
und in die SYS nach Rück¬ 
kehr (RTS) aus dem Maschi¬ 
nenprogramm die aktuellen 
Registerinhalte ablegt. 

Es gibt also eine Kommuni¬ 
kationsmöglichkeit mit dem 
Maschinenprogramm vor 
und nach der Abarbeitung, 
sie muß nur genutzt werden. 

Die vier Speicherbytes 
nach Bild 1 sind die Schnitt¬ 
stellen zu den Prozessor- 
Registern. 


Der Prozessor-Status wird 
dabei durch das Flag- 
Register dargestellt, Die Be¬ 
deutung der einzelnen Bits 
im Flag-Registei geht aus 
Bild 2 hervor. 

Hier nun eine Anwendung 
der Kommunikation mit 
Maschinen-U nterprogram- 
men. 

Die Betriebssystem-Routi¬ 
ne »Plot« soll genutzt werden, 
um den Cursor auf eine be¬ 
stimmte Position zu setzen, 
ab der dann eine Ein-/Ausga- 
be erfolgen kann, bezie¬ 
hungsweise es soll abge¬ 
fragt werden, wo sich der 
Cursor gerade befindet, wo 
also die nächste Ein-/Ausga- 
be erfolgen würde. 

Bild 3 zeigt das kleine 
Beispiel-Listing. In den Zei¬ 
len 100 bis 150 wird der Cur¬ 
sor auf Zeile 10, Spalte 5 ge¬ 
setzt. Anschließend wird zur 
Demonstration ein kleiner 
Text ausgedruckt und in den 
Zeilen 200 bis 260 die aktuel¬ 
le Cursorposition gelesen. 

(Rolf Zweifel) 

mm i3i 
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Kopieren von relativen Dateien 


C 64 




Kopierprogramm 
für relative Files 
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ach dem Starten des 
Programms erfolgen zu¬ 
nächst einige Abfragen: 

1. Sind alle Erweiterungen 
ausgeschaltet? Damit ist zum 
Beispiel DOS 5.1 oder Si¬ 
mons Basic gemeint. Wird 
die Frage mit ja beantwortet, 
so steht der gesamte freie 
RAM (zirka 60 KByte) als Puf¬ 
fer zum Kopieren zur Verfü¬ 
gung. Andernfalls wird die 
Pufferobergrenze auf $ 8000 
(32768) gesetzt, so daß zirka 
28 KByte zur Verfügung ste¬ 
hen. In beiden Fällen können 
jedoch beliebig große Files 
kopiert werden. 

2. Angabe der Gerätenum¬ 
mer und der Drivenummer 
von Ausgangslaufwerk und 
Ziellaufwerk. Zulässig sind 
die Gerätenummern 8 und 9 
sowie die Drivenummern 0 
und 1, bei anderen Num¬ 
mern erscheint eine Fehler¬ 
meldung. Es wird die Gerä¬ 
tenummer 8 und die Drive¬ 
nummer 0 auf dem Bild¬ 
schirm vorgegeben, so daß 
bei Verwendung eines 
VC-1541-Laufwerks nur vier 
mal RETURN gedrückt wer¬ 
den muß. 

3. Angabe des Filenamen 
der zu kopierenden relati¬ 
ven Datei. Beim Filenamen 
für das neue File wird der al¬ 
te Filenamen vorgegeben, 
er kann natürlich mit den üb¬ 
lichen Tasten geändert wer¬ 
den, 

4. Eingabe der maximalen 
Satzlänge des neuen Files. 
(Zulässig ist 1 bis 254). Sie 
muß nicht notwendigerwei¬ 
se mit der Satzlänge des al¬ 
ten Files übereinstimmen, 
sollte aber so lang sein wie 
der längste Satz im alten File. 
Andernfalls kommt es zu Da- 


Qüf 


132 


20 

50 


RRti 

R'£>7 

,c *'£>7 

C'CAd 
iS 


Ol Sk 


n/. 


Tr st 


Rüf 




>8464 

bicht 


igs 


40 

IN 
50 
99 


IF 


S-S+4?* *00 


-OC. 


^ R: if 


T RRN 


goto- 




f 'Rint 


No 

10 


'Cf: 


RN' 


PR 


F 


Nr . 




GS 




Öls/ 


20 
50 

*40 

'■Sq 


gRint- 


RTtf 




IF 


Ri nl_ 


A*. 






's " 


Und 


ssf Ffin t# 


N2 


fmm . ^hfn 


DRi , 




uird 


1 60 


1? 


0 


*60 
*80 
* 000 
*65, 
*010 

. ?01 
* 00 !?? 


IC 




1) 


R: 


l0&r. 


r C 


Rap 

c RRt 


RRz Ru, 


: GRfp 


■ 8 ) 


Ci- Of 


t RRn 


t Rrn 


er 

’ F ',N" 

RRm 


* 6 0 


r 8'Sc 

■QDS ,q 






°RT$i 


*030 
»040. 
* 04g 
.822 
; 050 


rZ4_ 
D RTr 

JfilTQ' 


’40. 


*4/ 


’ Rnd 

’ S >10 , 
5-> , »< 

. * *69. 

3 * * 60 

9 .00j 
1 9o , 




OC '2 

CR'S 


ORRT 


(Q) 


> Gq r n 


5s 




»50. 
* 4 / ' 




4/ 


'40. 


7q, ~ 
*69 


0 Q 


»04 


,4S,, 

*99. 

*1 


.5o 


49, 

■69 


*1 


*05/ 

*060 

? >*I 

0 ?g 


, '■9, 
'080 


03 7~,q 
^»*1 
cata- 
c^Ta.t 

*60 o 

cataI\ 


4/ 

* 7^ 

> * 4/ 

* / 7 4 
» 1 4; 


- 0 / 
* 4 ’ 


*4; 


*7; 


*70.7 ’ 169 


*69 


» 2 / 


1 / 


*69 


00 . 


88 . 


*4/ 

3 «,3 

8'8/v/ 


* 69 
Cat 


?07. 


^4, 




- 00 , 


» *^4 

: *69 

CAfjc 
» *69 
?&/’ 
- 08 . 


-, 1 

’*4/,. 

’if 9 ’ 3 ' 

*69 


*60 

- 0 / 


- 8 * 


*60 


*69 


19 


3o 


> 8 . 




*4/ 


* 60 


4Q ; 

/> 


Ne' 
*60 


Ci-OCf, 


A 0 90 * * yi 


* 0g 
, *13 
r **01 
* * 1 0 
* 6 ? - 
11?»" 


Ca 775 

: ? 6 ’ * 
ca T a . 

’ 2 4 0 < 

Cat4- 
.CaTat 


j O; 


•60. 
> 50 


■ 00 , 


*40 

204 


00 ; 
» *9 
■ *9; 


* 69 


-08 


*69. 


*5: 


f 6 .. 

*69. 

?4 0 ; 

? 00 . 


* 92 


*3. 


-40 


79. 


*60 


Ul 


IR 1 


-40. 


8 SN 


* *3r 


'* t 


*76. 


Da 


'Ar* 

& 


'00 , 


*69 


40 


**5e 
76 
US/ 
* *60 
*69 


ca ta 
80 /,. 
data- 


*60. 


■4/ 


CAf^ 

ca ta 


s. 


'42 


0 . 

:40, 

* 0 , 
04 9 
~ 0 Q. 


*40 


' 00 . 


69 


» *60 
800,’ 

■ 44 . 


-08 


-03 


»84; 


?07. 


UMnf 


*9: 


* 9 ^ 


* 69 


»56 


*7: 

•**. 


**, 

> *9 


*3. 

*7, 

*69 


* 0 / 

840 

884 


76 


44, 

» *69, 
»807, 
^»40 ’ 

*76. 


*3. 


* * 0 , 

Oe-e- 

-^5. o 


ß C 0 C/' 


- 00 . 


4S. 

*8. 


*60, 
0 / ' 


*69 


*9; 


•44, 


RRiy 


**7 0 


49. 


80 


** 
*90 


* 69 


Ca Ta.; 


*69 


0 


P *tlSS 


' 0, 


cataj 

>80/ 

Data.- 


*4/ 


** 


*69 

80S 


77. 


> 8/2 
» , -- / 6 , 
?49 


67 , 

*7 


60. 

> * O 

Rüfinf 


0 . 


* 6 ; 


5e 




* / 


*69 


*4/ 


* 60 


1 66 
*4 


Ci-OCfr 


60 


* 0 . 


*60 
» *69 
"»54. 


*4.; 


*4 

, 0 , 

** 


; 0 u 

,54 


*4/ 

* 6 - 


** 


3 0 S. 


*7; 


Listing. Kopieren 
von relativen 
Files 


' 0 . 


Ausgabe 7/Jüli 1984 







Kopieren von relativen Dateien 


C 64 



tenverlust. Aus Geschwin¬ 
digkeitsgründen wird übri¬ 
gens der Fehlerkanal wäh¬ 
rend des Kopierens nicht ab¬ 
gefragt, so daß der Fehler 
»overflow in record« nicht er¬ 
kannt wird! 

Nachdem alle Eingaben 
erledigt sind, beginnt das 
Kopieren. Das Programm 
gibt jeweils auf dem Bild¬ 
schirm an, welche Diskette 
einzulegen ist, bei Disketten¬ 
wechsel und am Programm¬ 
ende wird zusätzlich ein Ton- 
\ Signal erzeugt. Ist der Disket- 
^ tenwechsel durchgeführt, so 
muß die SHIFT-Taste ge¬ 
drückt werden, damit es wei¬ 
tergeht. Beim Arbeiten mit 
zwei Laufwerken oder einem 
Doppellaufwerk sowie beim 
Kopieren auf die gleiche Dis¬ 
kette kann die SHIFT-LOCK- 
Taste eingerastet werden, 
sobald alle benötigten Dis¬ 
ketten im richtigen Laufwerk 
liegen. Es wird dann ohne 
Pause kopiert. 

Ist das Kopieren beendet, 
startet das Programm von 
vorn. Es kann abgebrochen 
werden, indem als Geräte¬ 
nummer »q« eingegeben 
wird. Der Rechner meldet 
sich dann wieder mit »REA¬ 
DY« im Basic-Modus. Übri¬ 
gens ist während des gesam¬ 
ten Kopierens (ab Eingabe 
der ersten Gerätenummer) 
die Stoptaste funktionsfähig. 
Wird sie gedrückt, so wer¬ 
den die offenen Files ge¬ 
schlossen und das Pro¬ 
gramm startet von vorn. Da 
während des Kopierens der 
augenblicklich kopierte Satz 
auf dem Bildschirm ange¬ 
zeigt wird, ist es damit auch 
möglich, ein File nur teilwei¬ 
se zu kopieren. Es ist normal, 
daß beim Schreiben die er¬ 
ste Satznummer erst nach 
längerer Zeit erscheint, da 
die Floppy das Füe zuerst 
einmal einrichten muß. 

Folgende Fehlermeldun¬ 
gen werden vom Programm 
ausgegeben: ?? falsches 
Laufwerk oder Drive ??: Ge¬ 
rätenummer ungleich 8 oder 
9 beziehungsweise Drive¬ 
nummer ungleich 0 oder 1 
?? Unzulässige Satzlänge ??: 
Satzlänge größer 254 oder 
kleiner 1 

?? Gerät nicht bereit ??: Das 
angesprochene Laufwerk ist 
nicht eingeschaltet oder an¬ 
geschlossen. 

Abbruch !: Die Stoptaste 
wurde gedrückt. 
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Zusätzlich werden Fehler¬ 
meldungen der Floppy aus¬ 
gegeben, falls sie auftreten 
(Außer RECORD NOT PRE¬ 
SENT). FILE TOO LARGE 
bedeutet, daß kein Platz 
mehr auf der Diskette ist. 

Arbeitsweise des Programms: 

Die Abfrage der Stoptaste 
geschieht mit Hilfe der Inter¬ 
ruptroutine des Rechners, 
die 60 mal pro Sekunde 
durchlaufen wird und auto¬ 
matisch die Tastatur abfragt. 
In diese Interruptroutine 
wird eine zusätzliche Routine 
eingebunden, welche die 
Stoptaste abfragt. Ist die 
Stoptaste gedrückt, so wird 
zuerst ein eventuelles Ton¬ 
signal ausgeschaltet und alle 
Files werden geschlossen. 
Außerdem wird der Stack¬ 
pointer zurückgesetzt, da 
der Abbruch ja in jeder Un¬ 
terprogrammebene erfol¬ 
gen kann. Danach erfolgt ein 
Neustart. Als Zwischenspei¬ 
cher für die Filenamen wird 
der Kassettenpuffer, als Ar¬ 
beitsbereich der Speicher 
für Sprite 11 (ab Adresse 704) 
verwendet. Die Sätze des Fi¬ 
les werden in kompakter, se¬ 
quentieller Form im RAM 
des Rechners unterge¬ 
bracht. Es wird zunächst die 
aktuelle Satzlänge +1 ge¬ 
speichert und danach die 
Bytes des Satzes. Dadurch 
nehmen kurze Sätze auch 
nur wenig Platz im RAM ein 
(während sie auf der Disket¬ 
te den gesamten Platz ent¬ 
sprechend der maximalen 
Satzlänge des Files bele¬ 
gen). 

Eingabe des Programms: 

Der Basic-Lader bildet 
nach jeweils fünf DATA- 
Zeilen eine Prüfsumme, so 
daß nahezu alle Eingabefeh¬ 
ler erkannt werden. Nicht er¬ 
kannt werden vergessene 
Nullen und überschüssige 
Kommata. Wenn alle Prüf¬ 
summen korrekt sind, for¬ 
dert der Lader zum Einlegen 
einer Diskette auf. Das Pro¬ 
grammfile »rel kopierer« 
wird dann direkt auf Diskette 
erzeugt. Das erzeugte Pro¬ 
gramm kann dann wie ein 
Basicprogramm geladen, 
kopiert und mit RUN gestar¬ 
tet werden. 

(Bernward Bretthauer) 
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Tips & Tricks 


C 64/VC 20 


Listschutz 


Einen verblüffenden List¬ 
schutz für einzelne Zeilen er¬ 
hält man, indem man an die 
eigentliche Programmzelle 
einen REM-Befehl anhängt 
und dahinter in Anführungs¬ 
zeichen eine Reihe reverser 
»T« gefolgt von einem Dop¬ 
pelpunkt und einem beliebi¬ 
gen Text schreibt. 

Geben Sie doch einmal fol¬ 
gendes ein: 

10 PRINT"BAUM":REM"(19 
reverse T}”:10 PRINT "BLU¬ 
ME" 

Wenn Sie dieses kleine 
Programm starten, schreibt 
der Computer »Baum«, listen 
Sie aber das Programm, so 
sehen Sie nur die Zeile 10 
PRINT" BLUME”. 

(Roger Limberg) 

INPUT ohne 
Fragezeichen 

Die Ausgabe eines Frage¬ 
zeichens beim INPUT-Befehl 
kann durch Öffnen einer Ta¬ 
staturdatei unterdrückt wer¬ 
den: 

10 OPEN 1,0 : REM Tastatur¬ 
datei eröffnen 

20 INPUT#l,a$ : REM Einle¬ 
sen von Tastatur ohne Frage¬ 
zeichen 

30 REM Nicht vergessen, die 
Datei mit CLOSE 1 wieder zu 
schließen 


POKEs für den 
64er und den 
VC 20 


POKE 775,200 Listschutz ein 
POKE 775,167 Listschutz 
aus 

POKE 788,49 Run/Stop ein 
POKE 788,52 Run/Stop aus 
POKE 808,237 Run/Stop- 
Restore ein 

POKE 808,225 Run/Stop- 
Restore aus 
POKE 650,128 Dauerfunk¬ 
tion für alle 
Tasten 

POKE 650,0 Dauerfunk¬ 
tion nur für 
Space und 
Cursortasten 

POKE 650,64 Dauerfunk¬ 
tion aus für 
alle Tasten 


Zwei Einzeiler 


Zahlenkonvertierungen 
von Dezimal nach Hexadezi¬ 
mal braucht man recht häu¬ 
fig. Hier sind zwei Einzeller 
zu diesem Thema: 

— Hex X$ nach dezimal X:10 
x = 0:fori=ltolen(x$): 

xO = asc (mid$(x$,i,l)):x = 16*x 
+ x0-48+(x0>64)*7: next 

— Dezimal X nach hex X$:10 
x$ = ’”’:fori=Ito4:x0=x/16: 

x=x-int(x0)*16:x$ = chr$ 

(48 + x-(x > 9)*7 + x$:x = 
xO:next 


Tastatur statt 

Joystick 


Beim Commodore 64 las¬ 
sen sich alle Joystick-Funk¬ 
tionen auch über die Tasta¬ 
tur steuern, Hier eine Liste 
der entsprechenden Tasten: 
Joystick Port 1 
Feuer = SPACE 
Links = CTRL 
Rechts = »2« 

Oben = »1« 

Unten = »<« 

Joystick Port 2 

Feuer = CTRL + »J« 

Links = CTRL + »D« 

Rechts = CTRL + »G« 

Oben = CTRL + CRSR 

RIGHT 

Unten = CTRL + »A« 

(Günther Knöpfle) 


Zeitlupe für den 
VC 20 


Läßt man ein Programm 
auf dem Bildschirm auflisten, 
so läuft es in Sekunden¬ 
schnelle durch. Mit dem Be¬ 
fehl POKE 37877,0 werden 
nun alle Funktionen des VC 
20 extrem verlangsamt, und 
man kann sich so ein Pro¬ 
gramm in Ruhe ansehen. 
Durch Drücken einer belie¬ 
bigen Taste wird das Listen 
noch weiter verlangsamt und 
mit der RUN/STOP-Taste so 
lange angehalten, wie man 
die Taste gedrückt hält. 

Man kann den Befehl auch 
innerhalb eines Programms 
anwenden um, zum Beispiel 
während der Testphase, be¬ 
stimmte Abschnitte sehr 


langsam und somit nachvoll¬ 
ziehbar ablaufen zu lassen. 

Mit POKE 37877,72 oder 
einfach durch gleichzeitiges 


Drücken von RUN/STOP 
und RESTORE wird wieder 
der Normalzustand herge¬ 
stellt. (Johannes Conrad) 


«•“SÄ»*** 


Kasse 


Das kurze Maschinenpro¬ 
gramm dient dazu, den Bild¬ 
schirminhalt beim Commo¬ 
dore 64 abzuspeichern und 
auch wieder einzuladen. 
Dies kann mit einem Recor¬ 
der oder Diskettenlaufwerk 
geschehen. Dabei werden 
außer dem eigentlichen 
Bildschirmspeicher (der an 
eine beliebige Stelle ver¬ 
schoben sein kann und nicht 
ab Adresse 1024 liegen muß) 
auch das Color-R AM und die 
Tabelle der Doppelzeilen¬ 
kennzeichnungen mitbe¬ 
rücksichtigt. Das Abspei¬ 
chern und Einladen erfolgt 
über einen Pufferbereich im 
»verstec-' r - n« RAM ab 40960, 
da die drei verschiedenen 
Speicherbereiche in einem 
Stück abgespeichert und au¬ 
ßerdem die 1000 Farbnib- 
bles zu 500 Bytes zusammen¬ 
geschoben werden. Das er¬ 
spart beim Arbeiten mit dem 
Recorder wertvolle Zeit. 

Nach dem Eintippen des 
Basic-Loaders kann durch 
»RUN 16« geprüft werden, ob 
es richtig eingegeben wur¬ 
de. Trotzdem sollte es vor 
dem Start abgespeichert 
werden, da auch durch Prüf¬ 
summen nicht alle Fehler er¬ 
kannt werden können. Aus¬ 
gegeben werden zwei 
Adressen für das Laden und 
Speichern. Das Programm 
kann an jede Stelle des Ar¬ 
beitsspeichers geladen wer¬ 


den, in der vorliegenden 
Version lädt es sich an das 
Ende des Basic-Arbeitsspei- 
chers. Es ist davon auszuge¬ 
hen, daß das Programm di¬ 
rekt nach dem Einschalten 
ohne andere Erweiterungen 
eingeladen und gestartet 
wird. 

Soll ein Bildschirminhalt 
auf Diskette abgespeichert 
werden, so erfolgt dies 
durch 

SYS 40738 »FILENAME«, 8 

Beim Arbeiten mit Recor¬ 
der kann (auch beim Einla¬ 
den) die Gerätenummer ent¬ 
fallen; die Angabe einer Se¬ 
kundäradresse ist nicht er¬ 
laubt. Durch das Abspei¬ 
chern bedingte Betriebssy¬ 
stemmeldungen wie »PRESS 
RECORD & PLAY« sowie das 
Scrolling des Bildschirms 
sind unbedeutend und wer¬ 
den nicht berücksichtigt. Al¬ 
le Bildschirmdaten werden 
zuvor in einen Zwischenspei¬ 
cher übertragen. 

Das Einladen solcherart 
abgespeicherter Bild¬ 
schirminhalte geschieht mit 
SYS 40833 »FILENAME«, 8 

Zunächst werden die Da¬ 
ten in den Puffer von Adres¬ 
se 40960 bis 42483 geladen 
und dann in MSB-Tabelle, 
Farbspeicher und die mo¬ 
mentan gewählte Videoma- 
trix übertragen. 

(Ralph Babel) 
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Benutzen Sie die synthetischen Steuerzeichen, um Ihre Druckerlistings übersichtlicher 


N achdem ich m der Ausga¬ 
be 5/84 des 64’er-Maga- 
zins die Erzeugung syntheti¬ 
scher Steuerzeichen und ih¬ 
re Wirkung bei Bildschirm¬ 
betrieb dargestelll habe, soll 
jetzt von neuen Möglichkei¬ 
ten für Druckeranwender 
die Rede sein. Dabei bezie¬ 
he ich mich auf den Drucker 
VC 1515, mit dem die Steuer¬ 
zeichen ausgetestet wurden. 
Es ist nicht auszuschließen, 
daß der eine oder andere 
Druckertyp unterschiedlich 
reagieren wird. Die wichtig¬ 
sten Steuerfunktionen dürf¬ 
ten jedoch auf allen Geräten 
die gleichen Reaktionen her- 
vorrufen. 

Bevor es nun zur Sache 
geht, sei mir — vor allem für 
neu hinzugekommene Leser 
— ein kurzer Abriß des vor¬ 
angegangenen Artikels er¬ 
laubt: 

Zur Cursor-Steuerung, für 
RVS ON/OFF oder zum Bei¬ 
spiel für Farbumschaltungen 
stehen dem VC 20- bezie¬ 
hungsweise C 64-Anwender 
zwei Möglichkeiten zur Ver¬ 
fügung. Erstens kann die 
CFIR$-Funktion genutzt wer¬ 
den (Beispiel ?CHR$(19) be¬ 
wirkt HOME) und zweitens 
erlauben reverse Steuerzei¬ 
chen eine direkte und kurze 
Eingabe der Steuerbefehle 
(Beispiel: das reverse S ver¬ 
anlaßt ebenfalls HOME). 
Nun existieren jedoch einige 
CHR$-Codes, für die äquiva¬ 
lente Steuerzeichen nicht 
über zugehörige Tasten ab¬ 
gerufen werden können. So 
schaltet CHR$(14) beispiels¬ 
weise auf Kleinbuchstaben 
um. Mit Hilfe der ASC- 
Funktion zeigt sich, daß das 
reverse N den CHR$-Code 
14 trägt. Damit kann dieses 
Zeichen ebenfalls zur Steue¬ 
rung herangezogen werden. 
Da außer den konventionel¬ 
len Steuerzeichen keinerlei 
reverse Symbole in Strings 
Vorkommen können, muß 
das reverse N quasi künst¬ 
lich erzeugt werden (daher 
der Name »Synthetische 
Steuerzeichen«). Aber das ist 
kein Problem! Wir haben be- 

136 


reits ein Eingabeverfahren 
kennengelernt, das ich aber 
jetzt nicht wiederholen 
möchte. Statt dessen möchte 
ich Ihnen ein anderes Ver¬ 
fahren zeigen, das vielleicht 
ein wenig übersichtlicher ist, 
als das im vorigen Heft be¬ 
schriebene. 

Geben Sie die Programm¬ 
zeile, die ein im String ste¬ 
hendes Steuerzeichen erhal¬ 
ten soll, wie gewohnt ein. Re¬ 
servieren Sie dabei jedoch 
mittels Space die Stelle im 
Textstring, wo später das 
synthetische Steuerzeichen 
stehen wird. Schließen Sie 
die Eingabe der Zeile mit Be¬ 
tätigung der Retum-Taste ab. 
Nun können sie ohne Schwie¬ 
rigkeiten den Cursor auf 
die bewußte Stelle bewe¬ 
gen, durch gleichzeitiges 
Drücken von CTRL und RVS 
ON in den Revers-Mode 
schalten (es erscheint kein 
reverses R!) und schließlich 
den freigehaltenen Platz mit 
dem entsprechenden Rever¬ 
sezeichen belegen (m unse¬ 
rem Beispiel also mit dem re- 
versen N). Die so ergänzte 
Programmzeüe wird jetzt 
durch erneutes Drücken der 
Return-Taste verlassen. Fer¬ 
tig. Auf diese Weise lassen 
sich sowohl die altbekannten 
als auch die neuen Steuer¬ 
zeichen leicht erzeugen und 
entsprechend ins Programm 
einfügen. In den weiteren 
Ausführungen werde ich die 
synthetischen Steuerzei¬ 
chen vereinfachend in ge¬ 
schweiften Klammern dar¬ 
stellen (zum Beispiel rever¬ 
ses N = IN]). 

Die Drucker- 
»Synthies« 

Nun zum eigentlichen The¬ 
ma: Ich könnte fast wetten, 
daß einige Druckerbesitzer 
unter unseren Lesern inzwi¬ 
schen beim Experimentie¬ 
ren mit synthetischen Steuer¬ 
zeichen nicht schlecht ge¬ 
staunt haben. Denn auch 
hier eröffnen sich neue Mög¬ 


lichkeiten, an die bislang 
nicht zu denken war. So sind 
zwar keine spektakulären Ef¬ 
fekte in laufenden Program¬ 
men zu erzielen, dafür je¬ 
doch hat man erstmals die 
Möglichkeit, Druckerlistings 
zu manipulieren. Zuvor 
möchte ich Ihnen jedoch ei¬ 
ne Liste der Steuerzeichen 
geben. Es ist zu beachten, 
daß die mit *) gekennzeich¬ 
neten Steuerzeichen nicht zu 
den synthetischen zählen, da 
sich diese direkt über Tasten 
eingeben lassen. Sie wurden 
nur der Vollständigkeit hal¬ 
ber mit in die Tabelle aufge- 
nommen. 


Tabelle. Liste der Steuerzeichen 

Nun zu den Erläuterungen 
derjenigen Zeichen, die 
sinnvolle Anwendungen er¬ 
lauben. 


Grafik im Listing 


Das reverse H gestattet die 
Umschaltung des Druckers 
in den Grafik-Modus. Alle 
nachfolgenden Zeichen im 
String werden — sofern ihr 
jeweiliger CHR$-Code grö¬ 


ßer als 127 ist — als Grafikin¬ 
formationen interpretiert. In 
diesem Modus bleibt der 
Drucker so lange, bis er mit 


TEST“ LAUF 


10 P.EM GRAPHIK-MODUS 
20 REM IM LISTING 
30 0PEN4,4 

40 PRIHT#4,"TEST«LAUF" 
58 PRIHT#4 : CL0SE4 

RERDV. 


Beispiel 1 


(Nj oder [O] auf Schriftbe¬ 
trieb zurückgeschaltet wird. 
Betrachten Sie bitte das Bei¬ 
spiel 1. 

Zwischen »TEST« und 
»LAUF« befindet sich ein 
selbstdefiniertes Grafikzei¬ 
chen, das sowohl im Pro¬ 
grammlauf als auch im Li¬ 
sting ausgegeben wird. 
Auch wenn Sie es zunächst 
nicht glauben — Sie sehen 
ein Original-Listing und nicht 
etwa gePRINTete Textzeilen. 
Ich will Ihnen den Trick ver- 
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Steuerzeichen CHR$-Code Wirkung 


8 

Umschaltung auf Grafik-Modus 

CO 

10 

Zeilenvorschub 

m 

13 

RETURN. Nachfolgende Zeichen 
werden nicht mehr gedruckt. 

m 

14 

Umschaltung auf Breitschrift 

10] 

15 

Umschaltung auf normale Schrift¬ 
breite 

SPj 

16 

Festlegung der Druckstart¬ 
position 

*)IQ) 

17 

Umschaltung auf Kleinbuch¬ 
staben 

*m 

18 

RVS ON 

m 

26 

Zeichenwiederholung (Grafik) 

10 

27 

Punktadresse für Druckstart 

(SHIFT M] 

141 

SHIFT RETURN. Nachfolgende 
Zeichen werden in einer neuen 

Zeüe gedruckt. 

*)jSHIFT Q] 

145 

Umschaltung auf Großbuch¬ 
staben 

*)JSHIFT R] 

146 

RVS OFF 













zu machen. Es gibt interessante Möglichkeiten 


0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

1 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

2 

0 

ft 

• 

• 

• 

• 

• 
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0 
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0 
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0 

0 

0 

0 

0 
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0 

32 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

64 

+ 128 

136 

1S6 

148 

148 

148 

148 

148 

156 

136 

128 

128 



Bild 1. Vergrößertes Grafiksymbo! aus Beispiel 1 


raten. In einer Vergrößerung 
sieht das Grafiksymbol aus 
wie im Bild 1 gezeigt. 

Die Umrechnung des dua¬ 
len Bitmusters in Dezimal¬ 
zahlen liefert diejenigen 
CHR$-Codes, durch die das 
Zeichen spaltenweise beim 
Drucken entsteht. Man muß 
also nur wiederum syntheti¬ 
sche Zeichen finden, die die 
gesuchten CHR$-Codes tra¬ 
gen. Bei diesem Beispiel er¬ 
gibt sich: 


Zeilenvorschub 


Die Beispiele 2.1 und 2.2 
zeigen daß (Jj einen Zeilen¬ 
vorschub mit Rückwagen¬ 
lauf verursacht. In 2.1 befin¬ 
det sich das reverse J zwi¬ 
schen »TEST« und »LAUF«, 
bei 2.2 am Schluß des 
Strings. Da man das zweite 
Anführungszeichen eines 
Strings weglassen kann, so¬ 
fern keine weiteren Basic- 


TESTLRUF 


10 REH ZEILENVORSCHUB 
20 REN IM LISTING 
30 ÜPEN4..4 
40 FRINT#4, ,: TESTLfiUF 

50 PRIHT#4 : CL0SE4 

REflBY. 


Beispiel 2.2 


"TEST (Hj 

(SHIFT Hj 

(SHIFT MINUSj 

(SHIFT Tj 

(SHIFT Tj 

(SHIFT Tj 


8 

136 

156 

148 

148 

148 


(SH1FT Tj 

(SHFIT Tj 

(SHIFT MINUSj 

(SHIFT H] 

(SHIFT*j 

(SHIFT* j 

(OjLAUF " 

148 

148 

156 

136 

128 

128 

15 


Mit dieser Folge von rever- 
sen Zeichen erzielen Sie also 
den Ausdruck, der im Bei¬ 
spiel 1 abgebildet ist. 

Folgt dem [H] keine Grafik¬ 
information, das heißt ist 
der CHR$-Code kleiner als 
128, so kommt es zum Ab¬ 
bruch des Listings. Diese 
Tatsache kann man sich be¬ 
wußt zunutze machen, wenn 
man ohne größeren Pro¬ 
grammieraufwand einen 
Drucker-Listschutz in sein 
Programm einbauen will. 
Der Bildschirmbetrieb lei¬ 
det darunter nicht, da (H) 
dort nur eine Verriegelung 
der Umschaltung zwischen 
Groß- und Kleinschrift be¬ 
wirkt. 


Befehle mehr in dieser Zeile 
folgen sollen, ergibt sich so 
die Möglichkeit, echte Leer¬ 
zeilen mit [J] im Listing zu er¬ 
zeugen 


TEST 

LRUF 


10 REM ZEILENVORSCHUB 
20 REM IM LISTING 
30 0P£N4,4 
40 PRINT#4>"TEST 
LRUF" 

50 PRINT#4 ; CL0SE4 
READY, 


Beispiel 2.1 


Breitschrift — 
Schmalschrift 


Während (Nj beim Bild¬ 
schirmbetrieb auf Klein¬ 
buchstaben umschaltet, 
zeigt der Drucker eine ande¬ 
re Wirkung. Er wird veran¬ 
laßt, alle nachfolgenden Zei¬ 
chen in doppelt breiter 
Schrift auszugeben. Es ist al¬ 
so bei der Anwendung von 
[N] Vorsicht geboten, da ein 
für den Bildschirm konzipier¬ 
tes Programm beim Druk- 
kerlisting unerwünschte 
Steuerungen zur Folge ha¬ 
ben kann. In diesen Fällen 
sollte man (Nj wieder durch 


den konventionellen Befehl 
CHR$ ersetzen. 

Wollen Sie jedoch die 
Breitschrift zur übersichtli¬ 
chen Gestaltung eines Li¬ 
stings nutzen, so können Sie 
ruhig das (Nj hier und da im 
Programm verstecken. Es 
bleibt demjenigen, der das 
Programm lesen soll, sowie¬ 
so verborgen, Wenn nur eine 
Hervorhebung einzelner 
Worte, Befehle oder Zeilen 
gewünscht wird, muß die 
Breitschriftphase entspre¬ 
chend mit (O) beendet wer¬ 
den. Im Beispiel 3 sehen Sie 
dieses Vorhaben realisiert. 
Hier bewirkt das (Nj vor dem 
Wort »Test« die Umschaltung 
auf Breitschrift, während ein 
(Oj vor »Lauf« diesen Modus 
beendet. 


TEST LAUF 


10 REM BREITSCHRIFT 

29 REM IM LISTING 

30 0PEN4..4 

40 PRIHT#4, "TESTLflUF" 
50 PRIHT#4 : CL0SE4 

READY. 


Beispiel 3 


Druckstartposition 


Die Druckstartpositionie¬ 
rung — vergleichbar mit 
TAB — wird normalerweise 
mit CHR$(16) und nachge¬ 
stellter Startadresse vorge¬ 
nommen. Also etwa: 

PRINT # 4,CHR$(16) 'TOTEST' 
Diese Zeile druckt begin¬ 
nend in Spalte 10 nur das 
Wort »TEST« aus. Die im 
Strmg vorangestellte Zahl 
dient dabei als Startadresse. 
Das kürzere Äquivalent sieht 
nun wie folgt aus: 

PRINT #4,"(P]10 TEST” 
Doch Vorsicht! Obwohl 
diese Anweisung während 
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Autostart 


des Programmlaufs korrekt 
ausgeführt wird, verschluckt 
sie der Drucker im Listing 
vollständig. Das 4. Beispiel 
zeigt, daß von (P)10 zwischen 
»TEST« und »LAUF« nicht 
mehr zu bemerken ist. 


i£$i LnUF 


10 REH BRUCKSTFlRTPOS ITIGN 
15 REM IST IM LISTING 
20 REH NICHT SICHTBAR 
30 0FEN4,4 

40 PRINT#4;"TESTLRUF" 

50 PRIHT#4 : C-L0SE4 

REfiDV. 


Beispiel 4 

Damit verbietet sich die 
Anwendung des syntheti¬ 
schen [P] bei Programmen, 
die zum Beispiel zur Veröf¬ 
fentlichung vom Drucker do¬ 
kumentiert werden sollen. 


Für die Zeichen (Z) Zei¬ 
chenwiederholung und )[] 
(Punktadresse für Drucker¬ 
start) haben sich bislang 
noch keine sinnvollen Ein¬ 
satzmöglichkeiten ergeben. 
Sie sollen daher jetzt nicht 
weiter diskutiert werden. 
Auch auf die Beschreibung 
von (Q), [R], (SHIFT Q] und 
[SHIFT R] möchte ich ver¬ 
zichten, da sie keine syntheti¬ 
schen Zeichen sind und sich 
damit «ganz normal« verhal¬ 
ten. 

Ich persönlich benutze die 
synthetischen Steuerzei¬ 
chen gern zur Gestaltung 
von Listings. Wie so etwas 
aussehen kann, habe ich Ih¬ 
nen im abschließenden Bei¬ 
spiel 5 zusammengestellt. 

Vielleicht versuchen Sie 
einmal, die versteckten und 
unsichtbaren Steuerzeichen 
herauszufinden. 

Qürgen Wagner) 


100 REM DEMO ZUR OPTISCHEN STRUKTURIERUNG 
110 REM VON DRUCKER-LISTIHGS MIT 

120 REM" S VNTHET I SCHEIM 

130 REM" STEUERZEICHEN 


200 REM"* HflUPTPROGRRMM * 
210 FÜR. I = 1T064 

220 FRIHT"bS^"ER-MRGRZIN 
230 GOSUB300 : HEXT ■’" 

240 END 


300 REM* UNTERER OG RRMM * 

310 FORJ=1TO50 : NENT 
320 RETURN : " 


400 REM"GR I G I NRL — L I ST I NG ! " 

REflüV. 


Beispiel 5 


and W* 

Welcher Anwender hat sich nicht schon 
^ immer gewünscht, seine Programme »so einfach wie 

möglich« in den Computer zu bringen. Geräte der 
oberen Prois-/Leistungsklasse sind zu diesem Zweck mit 
einem Autostart-Mechanismus ausgerüstet. Dabei wird das Programm 
ohne weiteres Zutun nach dem Anschalten des Gerätes vom 
Massenspeicher (Floppy) in den Computer geladen. Hier soll jetzt die Realisierung 
eines solchen Autostarts auf einem C 64, beginnend mit der dazu 

nötigen Theorie, beschrieben werden. 



E s gibt beim C 64 mehrere 
Möglichkeiten, einen Au¬ 
tostart herbeizuführen. Ich 
will Ihnen hier eine weniger 
bekannte Methode vorstel¬ 
len: 

Die Stack-Manipulation. 
Der Stack belegt beim 
C 64 den Bereich $0100 bis 
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$01ff (256 bis 511). Er wird un¬ 
ter anderem zum Ablegen 
von Rücksprungadressen 
benutzt. Nach Beendigung 
einer Routine sucht sich der 
Prozessor vom Stack zwei 
Bytes (nämlich die Rück¬ 
sprungadresse in das Haupt¬ 
programm) und springt die 


Adresse, die sich aus diesen 
beiden Bytes ergibt, an. Ei¬ 
gentlich ist daraus schon zu 
ersehen, was zu tun ist: Man 
müßte diese Rücksprung¬ 
adresse so ändern, daß das 
Programm nicht an die ei¬ 
gentliche Rücksprungstelle 
springt, sondern auf eine ei¬ 


gene Routine. Jetzt jedoch 
tauchen schon die ersten 
Probleme auf: Wie soll der 
Stack geändert werden, oh¬ 
ne daß man dafür ein Extra- 
Programm braucht? Wie soll 
sich das Programm nach 
dem Ladevorgang automa¬ 
tisch starten? 

64er>onllno.do 
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Autostart 


C 64 


Die Theorie 


Auf beide Fragen gibt es 
eine Antwort: Da sich der 
Stack beim Ladevorgang än¬ 
dern soll, ist es das einfach¬ 
ste, den (manipulierten) 
Stack einfach mit abzuspei¬ 
chern! Damit hätten wir dann 
auch den von uns gewünsch¬ 
ten Inhalt des Stacks gela¬ 
den. Dann aber tauchen 
schon die nächsten Fragen 
auf: Woher wissen wir, aus 
welchem Stack-Bereich der 
Prozessor seine Rück¬ 
sprungadresse holt? Die Ant¬ 
wort ist: Wir wissen es nicht! 
Unsere einzige Möglichkeit 
ist, den ganzen Stack mit der 
von uns gewünschten Rück¬ 
sprungadresse zu belegen. 
Das Programm, auf das un¬ 
sere Adresse zeigt (ein Ma¬ 
schinenprogramm), hängen 
wir direkt an den Stack an. 
Von dieser Startroutine wird 
nun das eigentliche Haupt¬ 
programm, das wiederum 
hinter der Routine liegt, an¬ 
gesprungen. Die Reihenfol¬ 
ge der Programmteile und 
des benötigten Speichers ist 
in Bild 1 zusammengefaßt: 


2. Nach Beendigung des La¬ 
devorgangs will sich der Pro¬ 
zessor vom Stack die Rück¬ 
sprungadresse ins Basic ho¬ 
len, findet aber die (soeben 
geladene) Adresse auf unser 
eigenes Startprogramm und 
springt dies an. 

3. Unser Startprogramm 
springt jetzt das eigentliche 
Hauptprogramm an, das ir¬ 
gendwo ab $0801 stehen 
sollte. 

Nachdem also das Pro¬ 
gramm mit »LOAD "xxx",8,l« 
geladen wurde, startet es 
sich selbst sofort. 

Zum Abschluß sei noch ge¬ 
sagt, daß einige Vorgänge 
zur besseren Verständlich¬ 
keit vereinfacht werden 
mußten. Bei eigenen Experi¬ 
menten sei geraten, das ab¬ 
gedruckte Demo-Programm 
zu modifizieren. Außer eini¬ 
gen saftigen Abstürzen kann 
eigentlich nichts passieren. 


Die Praxis 


Das abgedruckte Demo- 
Programm läuft ohne Ände¬ 
rungen auf einem C 64 mit ei¬ 
ner 1541-Floppy (Gerätenum- 


»«sss2&r cr 
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Bild 1. Programmadressen 


tostart zu versehen. Dabei 
muß folgende Bedingung er¬ 
füllt werden: Das Programm 
muß mindestens eine Basic- 
Zeile enthalten. Dies ist not¬ 
wendig, da der vom 
Autostart-Maker generierte 
Autostart das Hauptpro¬ 
gramm mit dem RUN-Befehl 
startet. Zu diesem Zweck 
prüft der Autostart-Maker 
die Startadresse des ge¬ 
wünschten Programms und 
wirft eine Fehlermeldung 
aus, falls diese ungleich 
$0801 (Basic-Start) ist. 


In den Zeilen 30000- stehen 
die DATAs für das Startpro¬ 
gramm, das das eigentliche 
Hauptprogramm ansprin- 
gen soll. Die Bedeutung ein¬ 
zelner Zeilen läßt sich auch 
den REM-Statements des 
Programms entnehmen. 

Ein mit diesem Autostart 
versehenes Programm ist 
auch in gewissem Sinne ge¬ 
schützt. Es läßt sich weder 
mit RUN/STOP noch mit RE- 
STORE abbrechen. Wird ex¬ 
tern ein RESET-Impuls er¬ 
zeugt, so wird der ganze 
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Bild 2. Programmbeschreibung 


Wenn aber alles in Ord¬ 
nung ist, so arbeitet das Pro¬ 
gramm eine Weile mit der 
Diskette, bis es eine Ende- 
Meldung ausgibt. Sollte ein 
Diskettenfehler auftreten, so 
macht sich das Programm 
optisch und akustisch be¬ 
merkbar. Danach hat der Be¬ 
nutzer die Wahl: das Pro¬ 
gramm zu beenden oder ei¬ 
nen neuen Start zu versu¬ 
chen. 

Im Programm smd folgen¬ 
de Unterroutinen enthalten: 
10000 Fehlerkanal lesen 
und auswerten 
20000 Gong ausgeben 
(wird von Fehler-Routine auf¬ 
gerufen) 


Speicher gelöscht, bevor in 
die normale RESET-Routine 
verzweigt wird. Diese Eigen¬ 
schaften gehen auf den Auf¬ 
bau unseres Startpro¬ 
gramms zurück. 

Geladen wird das neue 
Programm mit »LOAD ”na- 
me",8,l«. Der Name ent¬ 
spricht dem des Ursprung¬ 
programms mit dem Zusatz 

»/a«. Noch ein Tip: Wenn Sie 

im Besitz eines Basic- 
Compilers sind, so sollten 
Sie den Autostart-Maker 
compilieren. Und nun viel 
Spaß mit dem Autostart-Ma¬ 
ker. Wenden Sie ihn doch am 
besten gleich mal bei Ihrem 
Programm an. 

(Andreas Wurf) 


Der Ladevorgang unseres 
Autostart-Programms muß 
mit »LOAD ”xxx",8,l« erfol¬ 
gen, damit das Programm 
nicht ab der Adresse $0801 
(normaler Basic-Speicher), 
sondern ab $0100 geladen 
wird. Schauen wir uns nun 
noch einmal an, was im ein¬ 
zelnen beim Ladevorgang 
passiert: 

1. Laden des Programms von 
Diskette oder Kassette mit 
»LOAD ”xxx”,8,l«. 


mer 8). Die Anpassung an an¬ 
dere Gerätenummern dürfte 
keine Schwierigkeit darstel¬ 
len. Lediglich in den Zeilen 
110, 112, 120 und 180 ist die 8 
durch eine 9 zu ersetzen. Die 
Beschreibung der einzelnen 
Programmteile ist in Bild 2 
zusammengefaßt. 

Nun zum Programm selbst: 
Das Programm Autostart- 
Maker gibt dem Benutzer 
die Möglichkeit, ein beliebi¬ 
ges Programm mit einem Au- 
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100A0 CLOSE l.C-R 
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20000 3 ct + , 30-.POKE SU^ l7sF ° 

So%fSS , ^4 j ° ,pwe si " ,l7iFW1 
Sfe^Ä 1 -^- 3 ' iA2 ’ j4 ' 5 ’ 162 ; 

«a>*0. :175 ’ 133 ’ 45 ’ 134 ’ 4t ' 3 " 9 ’ 

I&°32 «*'I.bfc■,«■.'»> f 133 ,1» , 134,IS».l‘0.0.‘ 

^o’°,r^^V,,0B,ZOB ,,3, ,,-,0 ,,- 

; r.ÄÄ^“ 


» u -onnuu«.»- 

■TT“ w . , w ^- HWEft! 

0 , im*>- V‘*1 W 
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• PR1N r'«^, SUCH M 1 ;, „...OPER i. • 
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■« ftNB press >*• ■■' 


‘IfftkFT.«»*.!»'« ^ pREss ft & , 

" ES " K 
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Io ! 

130 pri*t«i.cw rHR$ i2)r.N£^ :REn 

.* $0100 . Tn «u t pRlN™ l ’ C r 


reaby. 



SlH*i lü, rHR$(0)+^ Mn,v ‘ ’ 

— 1 * 1 ’ chr$ 

;t 4 , f SÄ s»Vf ■ «äl E 1 

h-nsui«! 

THEN 250!REn ” 1 E 

€r^r M oF ^rfs— 

10 PR1NT"K , F TWT it .„:CLOSE 1«N- 



Mit diesem Listing können Sie jedes 
Programm, das mindestens eine Basic- 
Zeile enthält, mit einem Autostart ver¬ 
sehen, direkt nach dem Laden ausge¬ 
führt wird. 


T USE IT. "--CLOSE 1*- CL 

:50 6ET *VTHE»| F PR1RF* 2 ' 6 *' ,!GDT0 

v,°. r" T S»' ,E *' 
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Spiele mit Computer-Grafik 


Hier handelt es sich um ein 
Bilderbuch ganz besonde¬ 
rer Art. Auf 128 Seiten findet 
man genau 111 Grafikpro¬ 
gramme für den Commodo 
re 64 und zu jedem dieser 
Programme auch das dazu¬ 
gehörige Listmg sowie eine 
Hardcopy des Bildschirmin¬ 
halts. Eine Reihe besonders 
beeindruckender Grafiken 
sind als farbige Bildschirm¬ 
fotos abgedruckt, jedoch ist 
auch der größte Teil der 
schwarzweiß wiedergege¬ 
benen Grafiken wirklich se¬ 
henswert. 

Auf den ersten Blick recht 
erstaunlich ist der sehr ge¬ 
ringe Umfang der Pro- 
grammlistings. Auf den zwei¬ 
ten Blick stellt man aller¬ 
dings fest — und kann es 
auch im Vorwort lesen — daß 
alle Programme mit Simons 
Basic geschrieben wurden 
und somit leider auf einem 
»normalen« C 64 nicht ohne 
weiteres übernommen wer¬ 
den können. Wer noch kein 
Simons Basic besitzt, wird 
aber wohl spätestens nach 
der Lektüre dieses Buches 
an eine Anschaffung den¬ 
ken, so überzeugend sind 
die dargestellten grafischen 
Möglichkeiten dieses erwei¬ 
terten Basic. Auch sehr be¬ 
eindruckende Grafiken wer¬ 
den in der Regel mit einem 
sehr geringen Aufwand von 
nur vier bis zwölf Programm- 
zeüen erzeugt. 

Das Buch behandelt in den 
einzelnen Kapiteln ein weites 
Spektrum der grafischen 
Darstellungsmöglichkeiten. 
Es beginnt mit der Darstel¬ 
lung und Überlagerung geo¬ 
metrischer Figuren wie 
Rechteck, Ellipse und Gera¬ 
de. Dabei ist es wirklich er¬ 
staunlich, welche Vielfalt an 
grafischen Ausdrucksmög¬ 
lichkeiten bereits durch 
Kombination und Überlage¬ 
rung dieser einfachen Figu¬ 
ren entsteht. 


Weitere Kapitel behan¬ 
deln die Darstellung speziel¬ 
ler Funktionen und Raum¬ 
kurven. Die einzigen länge¬ 
ren Programme in diesem 
Buch dienen der Erstellung 
von Erdkarten im Multicolor- 
Modus. Dabei kann zwi¬ 
schen verschiedenen Pro¬ 
jektionsmodellen gewählt 
werden. Besonders interes¬ 
sant erscheint die Möglich¬ 
keit, den Erdball als Globus¬ 
darstellung auf den Bild¬ 
schirm zu bringen, wobei die 
Neigung der Erdachse und 
die Drehung per INPUT ge¬ 
wählt werden können. 

Sehr interessant sind auch 
die Abschnitte über optische 


Dieses Buch verspricht ei¬ 
ne leicht verständliche Ein¬ 
führung in die Maschinen¬ 
spracheprogrammierung zu 
sein. Es wendet sich damit an 
Programmierer, die Basic 
mehr oder weniger gekonnt 
beherrschen und die nun 
beginnen möchten, kleinere 
Routinen ihrer Basic-Pro- 
gxamme aus Geschwindig¬ 
keitsgründen in Maschinen¬ 
sprache zu formulieren. Da¬ 
zu werden dem Program¬ 
mierer erst der 6510-Mikro- 
prozessor des Commodore 
64 und dann die Befehle und 
Adressierungsarten dieses 
Prozessors auf gut 60 Seiten 
nähergebracht. Danach er¬ 
folgt die Beschreibung und 
das Listing eines in Basic ge¬ 
schriebenen Assemblers. 
Wer sich die Mühe macht, 
die zehn Buchseiten abzutip¬ 
pen, wird bald erkennen, 
wie wertvoll ein guter As¬ 
sembler für einen Maschi¬ 
nenspracheprogrammiere r 
ist. Und der abgedruckte As¬ 
sembler ist schon aus Ge¬ 
schwindigkeitsgründen (er 
ist ja in Basic geschrieben) 


Täuschungen, Trugbilder 
und Moire-Effekt. Ein Meta¬ 
morphose-Programm, das 
zwei beliebig vorgegebene 
grafische Darstellung schritt¬ 
weise ineinander überführt, 
regt zu weiteren Experimen¬ 
ten in dieser Hinsicht an, 
ebenso die Kapitel über die 
Erzeugung von Zufallsgrafik. 

Das Buch bietet also neben 
einer Fülle von guten Grafik¬ 
programmen auch Denkan¬ 
stöße für die eigene Beschäf¬ 
tigung mit den vielfältigen 
Möglichkeiten der grafi¬ 
schen Darstellung am Com¬ 
modore 64. Leider fehlen 
Hinweise auf das Format der 


Viele Programme 
und Denkanstöße 


Grafikbefehle von Simons 
Basic, so daß die Anpassung 
an andere Computersyste¬ 
me zumindest recht schwie¬ 
rig sein dürfte. Dennoch mag 
das Buch auch für Besitzer 
anderer Computersysteme 


nur für die ersten Gehversu¬ 
che auf diesem neuen Pro¬ 
grammiergebiet geeignet. 

Deshalb wird wohl auch 
auf den letzten 20 Seiten des 
Buches das Data Becker- 
Produkt Profi-Ass beschrie¬ 
ben. Eine solche ausführli¬ 
che Werbung in einem Buch, 
welches nicht billig zu nen¬ 
nen ist, ist nicht sehr kunden¬ 
freundlich, zumal der Besit¬ 
zer von Profi-Ass das Be¬ 
schriebene auch in einem 
Handbuch nachlesen kön¬ 
nen sollte. 

Besser hätte ich es persön¬ 
lich gefunden, wenn zu Be¬ 
ginn des Buches darauf hin¬ 
gewiesen würde, daß zum 
vollständigen Erarbeiten 
des Buches ein professionel¬ 
les Assemblerprogramm 
(wie es Profi-Mon ohne Zwei¬ 
fel ist) sehr nützen kann. Da¬ 
mit hätte man sich den abge¬ 
bildeten Assembler, einen 
weiter hinten im Buch abge¬ 
druckten Disassembler und 
die Beschreibung von Profi- 
Ass sparen können und die 
so gewonnenen zirka 50 Sei¬ 
ten mehr zu dem eigentli- 


fach zur näheren Beschäfti¬ 
gung mit den Grafikmöglich¬ 
keiten von Computern allge¬ 
mein anregt. 


NorbertTfeitz 

SPIELE MIT 

COMPUTER 

GRAFIK 

für Phantasie und Logik 


W voHntandlge Programme 
mil LIBTon, Aöblldunger und 
nntegondtn Kommentaren 

Psgsf/Emrj 


Wer das Abtippen der 111 
Programme scheut, kann ge¬ 
gen Einsendung für 42,75 
Mark eine Programmkasset- 
te beim Buch-Verlag anfor¬ 
dern. (ev) 

Dr. Norbert Treitz: Spiele mit Computer¬ 
grafik, 128 Seiten, Lehrmittelverlag Wil¬ 
helm Hagemann, Düsseldorf 1981, ISBN 
3-544-53003-1, Preis 28,50 Mark. 


chen Zweck des Buches, der 
Einführungin die Maschinen¬ 
spracheprogrammierung, 
nutzen können, 

Gefallen hat mir an dem 
Buch die schrittweise Erar 
beitung der hochauflösen¬ 
den Grafikprogrammie¬ 
rung, der abgedruckte Ein¬ 
zelschrittsimulator und die 
ausführliche Beschreibung 
einiger Betriebssystemrouti¬ 
nen. 

Zusammenfassend möch¬ 
te ich sagen, daß das Buch 
dem Anfänger in der Maschi¬ 
nenspracheprogrammierung 
zwar einige wertvolle Hinwei¬ 
se bietet, daß aber auch ge¬ 
rade für den Anfänger wichti¬ 
ge Kapitel zugunsten ande¬ 
rer, unwichtigerer Abschnit¬ 
te nicht ausführlich genug be¬ 
handelt werden. 39 Mark 
sind allerdings für die ver¬ 
wendbaren Beispiele ein 
stolzer Preis! 

(Wolfgang Willing) 


Lothar Englisch: Das Maschinensprache¬ 
buch zum Commodore 64, 202 Seiten, Data 
Becker GmbH, ISBN 3-89011-008-8, 39 Mark 


interessant sein, da es ein- 


-Gi 


2LADL 


Das Maschinensprachebuch zum Commodore 64 
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1 REM********************* 

2 REM* * 

3 REM* COPYRIGHT BY : * 

4 REM* BERND PAPE * 

5 REM* UNTERM SCHRICK 11 * 

6 REM* 4630 BOCHUM 1 * 

* 

10 PRINT"L":P 0 KE 53281 , 0 :P 0 KE 5328 Ü,: 


20 PRINT: PRINT"ii 
30 PRINT" isr iS 

40 print" ians 

50 PRINT" I 5 TSS Hi, 
60 PRINT" IsTH Hi-' 
70 FÜRI=OTÜ 1 :PRINT' 
I ":NEXTI 

80 PRINT" HS SS I 

IS rn ÜÜ " 

90 PRINT-n m SS I 


isr w\ " 

W w\ " 

isrsri " 
m wwr\ " 

HS l^HF) " 
HS SS i 

HS SS I ES 


HS SS 


A n seinem Foto können Sie 
schon erkennen, daß der 
Autor Bernd Pape eine Men¬ 
ge Witz und Phantasie be¬ 
sitzt. Auch in seinem »Le¬ 
benslauf« und seiner Spiel¬ 
beschreibung kommt das 
ganz klar zum Ausdruck. 
Doch lesen sie selbst: 

Anleitung für das Spielpro¬ 
gramm »Q Bernd«. 

Was Sie hier erleben, ist 
der ebenso heldenhafte wie 
qualvolle Untergang des 
letzten Menschen der Erde: 
O Bernd. Auf einem hyper¬ 
wasserstoffbombenfesten 
Teil des Verwaltungsgebäu¬ 
des der Antiwurgkommis- 
sion ist es ihm gelungen, die 
Explosion zu überleben, die 
ein jähzorniger Erdkunde¬ 
lehrer in einem Wutaus¬ 
bruch durch seine über¬ 
mächtigen Gehirnwellen er¬ 


zeugt hat. Q Bernd hat sich 
auf dem folgenden langen 
Flug durch den Weltraum 
auf den leider nur sehr spär¬ 
lich vorhandenen Sauerstoff 
einstelien können, was aller¬ 
dings nicht ohne bleibende 
Schäden abgegangen ist, 
wie man an seiner dunklen 
Hautfarbe und seinen O- 
Beinen erkennen kann. Aber 
leider schwebt Q-Bernd mit 
seinem hyperwasserstoff¬ 
bombenfesten Fetzen nicht 
allein durch die unendlichen 
Weiten des Weltraums. Als 
er ungefähr 765.854.863.654. 
392 Q-Berndsche Lichtmo¬ 
nate hinter sich gelegt hat, 
was nur dadurch möglich 
war, daß er sich jegliche Er¬ 
nährung seines schon da¬ 
mals O-beinigen und sehr 
dunklen Körpers abgewöhnt 
hatte, näherte sich ihm ein 


M M Ä W M W 

ioo print" n Ha sa i 

Nt üm !P m m w 

110 PRINT“n HB Hi I 

Äti mm m in m W 

120 print-o m m i 

p m b b w m p* 

130 PRINT'T! HB Hi i 

SH m w m 'mm 1 

140 PRINT'T] HB Hi I 
150 PRINT" HÖ Hi i 
160 PRINT" HB \Wm\ 
170 PRINT“ HB i^HTl 
180 PRINT" HB 
ERND PAPE 1984 " 

190 PRINT" HB 


aa 

Hi 1 

53 


HB 

Hi i 

55 

•i m 

HB 

Hi 1 

55 

m m 

HB 

Hi i 

55 

mmm 

HB 

Hi I 

» 


W\ HB 

Hi 

1 ‘ 


i=r h 

Hi, 




HB Ha/" 

9 [WWF\ L 2 <C> BY B 


iann 

200 PRINT" HB HS/ HS W 

■ri 

210 PRINT"D Ma 

Hi,'" 

220 GGSUB1130 

230 SI=54272:FGRI=5TD19STEP7:POKES1+1,15 
:POKESI+I+1,255:NEXTI:POKESI+24,15 
240 P0KE53280,2:PRINT"L":FORI=1TOB:PRINT 
: NEXT 
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Version eines bekannten Spielhallenhits. 


250 PRINT"l3fe|M0ECHTEN SIE MIT": PRINT 

260 PRINl "KJJ130'VST ICK (PORTI ) ODER 

KTHASTATUR":PRINT 

270 PRINT "fcfSPI ELEN ?":B*=" " 

280 IFPEEK(203)=22THENPOKE198,0:G0T0320 
290 IFPEEK(203)=340RPEEK < 203)=60THENB*=" 
J 11 : GOTG380 

300 D=D+1:IFD >500THEND=0:GOTO!O 
310 G0T028Q 
320 PRINT"L," 

330 PRINT: PR INT "l^WELCHE TASTE SÜLL HEISS 
EN SPRINT 

340 INPUT"-LINKS OBEN";LO$:PRINT 
350 INPÜT 11 -RECHTS OBEN " ; R0$: PR I NT 
360 INPUT"-LINKS UNTEN";LU*:PRINT 
370 INPÜT"-RECHTS UNTEN";RU* 

380 PRI NT"L":L=0:FA=3:P=0:RU=48 

390 B=1160:F=55432:F0RA=0T06:GOTO1030 

400 FORAi=ÜT06:H=A*79+A1*42 

410 FORI=0T02rPOKEF+H+1,1:NEXTI:P0KEB+H, 

233:POKEB+H+1,224:POKEB+H+2,105 

420 FÜRI=OTÜ1:PGKEB+H+I+40,224:PQKEF+H+I 

+40,2:NEXTI:NEXTAl:NEXTA 

430 FÜRI=4TÜ18STEP7:POKESI+I,0:NEXTI:RES 
TORE 


Wesen, das einen derartigen 
Hunger entwickeln kann, 
daß es sogar Scheusale wie 
Q-Bernd frißt. Sie haben mit 
Ihrem Commodore 64 nun 
die Möglichkeit, das Leben 
Q-Bernds durch schnelle Re¬ 
aktion und gute Taktik um 
wertvolle Sekunden zu ver¬ 
längern. Sagen Sie ihm wahl¬ 
weise per Tastendruck oder 
Joystickbewegung, wie er 
diesem Scheusal auswei- 
chen kann. Jeder Sprung auf 
eine Stelle des hyperwasser¬ 
stoffbombenfesten Fetzens, 
den er auf seiner langen Rei¬ 
se noch nicht erreicht hat, 
dankt er Ihnen in seiner To¬ 
desangst durch Punkte. 

Wenn er auf diese Weise 
den ganzen Fetzen erforscht 
hat, hat ihr Commodore 64 
durch die Punkte genügend 
Kraft, um Q Bernd einen neu¬ 


en noch hyperwasserstoff¬ 
bombenfesteren Fetzen zu 
geben, was Ihnen Q Bernd 
durch Zusatzpunkte dankt. 
Doch — Oh Schreck! — mit 
jedem Fetzen erhöht sich die 
Anzahl der gefräßigen We¬ 
sen. Erst wenn ihre Anzahl 
auf die runde Zahl 10 gestie¬ 
gen ist, hört diese er¬ 
schreckende Fortpflanzung 
auf (die Wesen haben Angst 
vor Überbevölkerung). Doch 
der Untergang Q Bernds läßt 
sich nur hinauszögern — 
nicht verhindern. Irgend¬ 
wann werden ihn die Wesen 
packen und Sie können in Ih¬ 
rem Mitleid nur noch die Ge¬ 
räusche der gestörten Ver¬ 
dauung der widerlichen 
Scheusale wahrnehmen, 
ehe Sie das Spiel wieder mit 
einem Druck auf die Taste 
»Fl« neu starten. 
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Q-Bernd 


C 64 



POK' 




+P»* 79 


Äft O 79, 


.79 ,lt^.FO^ U '“' ' 3 


5% f^>-‘° ^7^° a 

^^> tP0 

* t= »3 “T^THEWfc^ eoTOBOO 

'S» •gS^sSS'v; jS5% 

620 'vLp^^VJa tüÖ*' « 0 T02°° 

6^o lP jf + i*-^ f ^i^*-®nT0 700 

6*° Vppo* 1 '1660^° 7 °-vO 

fc5 ° ifP° C1 Ö° T ° 7 

s^^gsa&s 5 ^ 

S.'^SSvStÄ'«'"""’ 


Listing 

Q-Bernd 

(Fortsetzung) 


u> 


20^ 


u> 


-. pOP 




eua^a^— P oW 


.20^ 

A03 


V l,35 22 4,pO^ £S 


s, ;;. . f ^' s 

^Ss^^ss^—-* 


f 0 .«,.»- 


Und nun das Gleiche für 
Praktiker: 

Steuern Sie ihr Männchen 
wahlweise mit Joystick oder 
Tastatur so, daß alle 49 Fel¬ 
der gefärbt werden, um in 
die nächste Phase zu gelan¬ 
gen. In jeder Phase bis zur 
Phase 10 erhöht sich die An¬ 
zahl der Figuren, deren Be¬ 
rührung mit Ihrem Männ¬ 
chentödlich ist. Danach wird 
das Spiel nicht mehr schwie¬ 
riger. Mit Druck auf die Taste 
»fl« können Sie das Spiel neu 
starten. (Bernd Pape) 


Lebenslauf 

Am 6.12.1968 wurde ich als 
angeblich gewolltes Kind 
meiner Eltern versehentlich 
im Ruhrgebiet geboren und 
wenig später in Stade, einer 
sehr schönen Stadt zwischen 
Hamburg und Cuxhaven auf 
den Namen Bernd getauft. 
Bernd Pape war also der Na¬ 
me, der von nun an meine 
Umwelt in Schrecken verset¬ 
zen sollte. Ungefähr 6% Jahre 
später gelang meinen Eltern 
ein kaltblütiges Attentat: Sie 
schulten mich in Bochum, wo 
ich auch jetzt noch meine Re¬ 
sidenz habe, gegen meine 
schärfsten Proteste ein. Als 
ich nach 4 Jahren meinte, die¬ 
ses Übel überstanden zu ha¬ 
ben und ich gerade das Wort 
»arbeiten« aus meinem Voka¬ 
bular streichen wollte, ge¬ 
lang es der Bürokratie, einen 
entscheidenden Sieg über 
mich zu erlangen: Ich wurde 
zum Gymnasiasten erklärt. 
All diese Mißhandlungen 
konnten mich aber nicht da¬ 
von abhalten, meinem Pro¬ 
test durch ausgiebige Frei¬ 
zeitnutzung Nachdruck zu 
verleihen. Zunächst hatte ich 
nur die Möglichkeit, meine 
Eltern und die Nachbar¬ 
schaft durch falsches, aber 
lautes Akkordeonspielen zu 
ärgern. Mit meinen ersten 
Elektronikkästen konnte ich 
dann aber mein Waffenlager 
erweitern: Ich erging mich in 
den herrlichsten und laute¬ 
sten Sirenenschaltungen des 
19. Jahrhunderts — oder des 
zwanzigsten? Geldgeschen¬ 
ke zur Konfirmation (weitere 
Spenden nehme ich gerne 
entgegen!) ermöglichten es 
mir, alle Leser dieser Zei¬ 
tung aufzufordern, den 
Kampf um möglichst viel 
Freizeit nicht aufzugeben! 
Denn von diesem Geld holte 
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Q-Bernd 


C 64 


ben habe. Nach einer Latein¬ 
arbeit, deren Zensur nicht 
genau den Vorstellungen 
meiner Eltern entsprach, er¬ 
hielt ich »Computer-Verbot«. 
Gott sei Dank sah ich dies 
schon beim Schreiben der 
Arbeit voraus, was dazu führ¬ 
te, daß ich meine Diskette mit 
dem schon angefangenen 
Programm vor der lieben¬ 
den Umsicht meiner Eltern 
retten konnte. So entstand 
der Rest des Programms 
durch mein heimliches Pro¬ 
grammieren in verschiede¬ 
nen Computerläden Bo¬ 
chums. Hier ist es nun, das 
Programm, für das Bernd Pa¬ 
pe seinen Hausfrieden ge¬ 
opfert hat: Q Bernd! 

(Bernd Pape) 



S°z°**C NB60 S296:if ^< 

970 P pRiHr ENRE ^ SF+1 * P ° Ke H Fq w 

ss gsr 

900 UTHEN8 ’0 

+ lG* L -°t'55 328 0, Fa 

92 n P * 1N T 1 o „ L . 

f Or,~ 


!P=p 


Listing Q-Bemd 
(Schluß) 


940 

1^0 0KES I *207. POKE Sl 

* 0 - p OKFs r . _ 1 »I: P 

17 OKESI+6 ’ 2s 5--po 

“U , * i 7; POkfrc; t 

loio' p£? >>m ' S 8 I f7’° 

ns ^ ei ; 

/ t ° 30 REaS. 9 ®’“=«AIT 198 , N Ne, «S 9 

’ KL - p °Pesi + H K+1 

!ßss^^ 

; 23u >’is ’ 0: «£;4 a ’/ 33 ■ ve * 1 

‘loo F^J* : IF *<OT HE ’ (PEEK<SS373 >fiND240 

f£l X 01 r ’° r ° 7 " ReAoe - türn 

>2Ss DflT «u 0 , 3s Sa+ «*s^, e:N 

jfo , 35s , ’J 55 ’ 355 - 

i s » 

Re «OV. ‘ ’ 36 ’°.o (60 

’ 9s,^ 


Druckfehler¬ 

teufeichen 



Die Redaktion hat¬ 
te mir ausdrücklich 
den Kampf erklärt. 
Dennoch konnte ich 
wieder zweimal zu¬ 
schlagen und Ver¬ 
wirrung stiften. 

Schatzsucher, Seite 91 Aus¬ 
gabe 5/84 

»Nein, die Zeile 440 im Li¬ 
sting »Schatzsucher« fehlt 
nicht« wurde zur Stan¬ 
dardantwort. Der Autor 
dieses Listings hatte an¬ 
scheinend, bevor er den 
Beitrag einsandte, ein Re- 
number durchgeführt. 
Nachträglich wurde dann 
von ihm die Zeile 440 ent¬ 
fernt. Was in dieser Zeile 
stand, wird wohl immer 
ein Rätsel bleiben. Auf 
den Programmablauf hat¬ 
te sie auf jeden Fall kei¬ 
nen Einfluß. Trotzdem be¬ 
danken wir uns bei den 
zirka eintausend. Lesern, 
die uns im letzten Monat 
diesen »Fehler« melde¬ 
ten. 

Nun zu einigen wirkli¬ 
chen Fehlern. Wir möch¬ 
ten uns auch hier noch bei 
unseren Mitstreitern im 
Kampf gegen den Fehler¬ 
teufel bedanken. 

Supergrafik ohne Erweiterungs¬ 
modul, Seite 81, Ausgabe 5/84 

In Zeile 4030 muß »BC 
+1« durch »BC = BC +1« 
ersetzt werden, sowie in 
Zeile 4050 P = PEEK(P): 
durch P = PEEK(B): 

AdreB- und Telefonregister, 
Seite 67, Ausgabe 5/84 

Zeile 1060 muß lauten: 
1060 FORI=OTOAN 
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Kurse C 64/VC 20 


AI.I.IE TASTIiN-ZEICHEN-« 


Das ist der dritte Teil einer Serie über die Abfragemethoden für Tasten und ihre v 
und den C 64 gleichermaßen. Wo Unterschiede auftreten, sind c 


I ch habe im zweiten Teil dieser Rei¬ 
he versucht, Sie zum Experimen¬ 
tieren mit den ASCII-Codes anzu¬ 
regen. Heute habe ich für Sie die 
vollständige Liste aller 255 Code¬ 
werte vorbereitet und zwar in einer 
Art, die sicher einiger Erklärungen 
bedarf, 


ASCII-Codes, die von 
Commodore verschwiegen 
werden 

Ich habe nämlich noch ein paar 
zusätzliche Überraschungen parat, 
auf die man nur durch Zufall kommt 
oder durch Studium des Betriebssy¬ 
stems oder aber, wenn man den Auf¬ 
satz von G. Urbanczyk in Computer 
persönlich vom 19.10.1983, Seite 76, 
gelesen hat. 

Tippen Sie bitte das Programm 
Nummer 3 aus dem 64’er Mai-Heft, 
Seite 107, ein, nämlich eine der drei 
Versionen zur Tastaturpuffer-Abfra¬ 
ge. (Ich verwende unten die GET- 
Version). 

310 PRINT CHR$(147) 

320 GET A$ 

330 IF A$= ” ” THEN 320 
340 PRINT ASC(A$) 

350 GOTO 320 

Auf beiden, VC 20 und C 64 erhal¬ 
ten Sie nach RUN 310 und Drücken 
der RETURN-Taste (natürlich) den 
ASCII-Code 82. Wenn Sie zuerst die 
CTRL-Taste drücken und halten und 
dann erst das R drücken, dürfte ei¬ 
gentlich nichts passieren, denn die 
CTRL-Taste gilt ja angeblich nur für 
die Farben. Ja, denkste! Wir erhal¬ 
ten nämlich die Zahl 18. Ein Blick in 
die ASCII-Tabelle zeigt uns für 18 die 
Funktion »REVERSE-ON«. 

Versuchen Sie dasselbe mit CTRL 
und der —-Taste. Wir erhalten die 6, 
und nicht 95, wie es eigentlich sein 
sollte. 

Für den VC 20 ist das alles. Aber 
immerhin, wir haben sozusagen 
noch zwei zusätzliche Funktionsta¬ 
sten gefunden. 

Beim C 64 aber geht es erst richtig 
los: 


Der Versuch wird Ihnen zeigen, 
daß alle Buchstaben, von A bis Z, zu¬ 
sammen mit CTRL gedrückt, einen 
anderen ASCII-Wert, nämlich 1 bis 
26, ergeben, als allein gedrückt. 

Desweiteren biete ich Ihnen noch: 

CTRL — t =30 
CTRL - = = 31 
CTRL - £ = 28 
CTRL - : =27 
CTRL - ; =29 

Das heißt aber, daß einige ASCII- 
Codezahlen zwei Bedeutungen ha¬ 
ben. Oder umgekehrt, zwei ver¬ 
schiedene Tasten (kombiniert) ha¬ 
ben denselben ASCII-Code. 

Schwierigkeiten dadurch, daß ei¬ 
nige ASCII-Werte zwei Bedeutun¬ 
gen haben, gibt es deswegen nicht, 
weil die Kombination m: CTRL nicht 
PRINT-bar ist (PRINT CHR$(19) 
schickt immer den Cursor »hörne«, 
mit dem »S« passiert gar nichts). 

Andersherum kann es allerdings 
Vorkommen, daß eine Tastenabfra¬ 
ge, zum Beispiel 

GET A$:IFA$ = CHR$(19)THEN. 

sowohl auf die Taste »HOME« als 
auch auf »CTRL-S« reagiert. Da ist si¬ 
cher etwas Vorsicht angebracht. 
Aber ein Blick in meine ASCII- 
Tabelle zeigt Ihnen ja die Doppel¬ 
deutigkeiten. 


An dieser Stelle erwarte ich ei¬ 
gentlich einige Einsprüche, wie: 
»Wozu das alles, die acht Funktions¬ 
tasten, oder gar erweitert auf 32, rei¬ 
chen doch völlig aus!« Für den Haus¬ 
beziehungsweise Spielgebrauch ist 
das sicher richtig. Aber bei profes¬ 
sioneller Software, welche benutzer¬ 
freundlich auf gebaut ist, kann es oft 
gar nicht genügend Funktionstasten 
— besonders solche, die eine opti¬ 
sche Buchstabenbeziehung zu der 
Abfrage haben sollen — geben. 
Wenn in einem Programm gefragt 
wird, ob Sie »LOADen« oder »SÄVEn« 
wollen, ist CTRL-L oder CTRL-S halt 
klarer, als f-1 oder f-3. 

Ich finde es schade, daß diese 
großartige Möglichkeit nur auf dem 
C 64 gegeben ist. Hier zeigt sich 
deutlich, daß dieser Computer 
doch professioneller ist als der VC 
20 . 


Die vollständige ASCII- 
Tabelle 


So, jetzt können Sie meine ASCII- 
Tabelle erst richtig interpretieren 
(Tabelle 1). 

Leere Kästchen haben keine Be¬ 
deutung für die betreffende Code¬ 
zahl. 


5 rem************ ***************.#.#.#.#*.#* 

6 REM***** SPIEL MIT FI IMKELIM ********** 

7 REM*********************** #Ä#Ä * ###### 

10 PRINT CHR*(147> 

20 F=0 
30 R=65 

40 FÜR T=1 TO 600:NEXT T 
50 A=INT(RND(O)*7)+65 
60 IF R>71 THEN 400 
70 PRINT CHR$CA); 

80 FÜR T=1 TD 1000:NEXT T 
lOO BET A$ 

110 IF A$< >"Bl" THEN 300 

< r-.r-t t M-r M urfii » 

^ v r ' r ' ir '' 5 Programm 2 

200 IF A=R l HEN F=F + i Spiel mit »Finkein« für C 64 

210 GOTO 50 

300 IF AOR THEN F=F+1 

310 R=R+1 

320 GOFO 50 

400 PRINT"BßSäGSDAS SPIEL IST ZU ENDE; "ßS£?l 
"F"FEHLER" 
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ihiedenen Codes. Alle Angaben gelten für den VC 20 
ferte für den Commodore 64 in Klammern gesetzt. 


Jeweils zwei Zeichen nebeneinan¬ 
der mit derselben Codezahl stellen 
die beiden Zeichensätze dar, in die 
mit C = SHIFT (Commodore-Taste) 
umgeschaltet werden kann. Wo nur 
ein Zeichen steht, ist es in beiden 
Zeichensätzen identisch. 

Die Funktionen der Codezahlen 
129 und 149 bis 155 gelten nur für 
den C 64. Interessant ist übrigens, 
daß die 4. und 7. Spalte identisch 
ist, ebenso die 6. und 8. Spalte (au¬ 
ßer dem Zeichen für 255). 

Ich möchte jetzt gern die Szene 
wechseln, ohne aber den ASCII- 
Code aus den Augen zu verlieren. 
Wir haben den ASCII-Code bisher 
verwendet, um Tasten abzufragen 
oder Funktionen auszuführen. 
PRINT CHR$(66) druckt zum Bei¬ 
spiel den Buchstaben B auf den Büd- 
schirm. 

Welche Methoden kennen Sie 
noch, mit denen das gleiche erzielt 
werden kann? 

Die erste, die jeder aus dem 
Handbuch lernt, ist 
PRINT "B". 

Die komplizierteste ist: 

POKE 7680,2: POKE 38400,7 
(POKE 1024,2: POKE 55296,7) 

Diese beiden Vorgehensweisen 
wollen wir uns näher anschauen und 
prüfen, ob wir sie in Analogie zu 
dem ASCII-Code für Tastenabfra¬ 
gen einsetzen können. 

Es ist sicher viel bequemer, länge¬ 
re Buchstabenreihen oder gar Texte 
zwischen Gänsefüße gestellt einzu¬ 
tippen, als eine Serie von 
CHR$-Werten, ganz abgesehen vom 
erforderlichen Speicherplatz. 


Nicht ganz so bequem ist der 
Gänsefuß-Modus bei Steuerzei¬ 
chen, wie zum Beispiel Cursor- 
Bewegungen, besonders, wenn 
man diese herbeiführen will, aber 
statt dessen die reversen Darstellun¬ 
gen auf dem Bildschirm erzeugt, 


Der Gänsefuß-Modus 


Geben Sie es zu. Sie haben des¬ 
wegen auch schon herzhaft ge¬ 
flucht. Auch jeder Redakteur bittet 
um Listings mit CHR$-Darstellung 
anstelle der reversen Zeichen, die 
bei der Druckwiedergabe oft zu 
Schwierigkeiten führen. 

Jetzt wissen Sie, warum ich bei 
meinen Progrämmchen immer 
PRINT CHR$(147) statt PRINT" ” 
verwende. 

Genauso austauschbar wie bei 
PRINT ist der ASCII-Code mit dem 
Gänsefuß-Modus bei der Tastenab¬ 
frage. 

Statt: 

10 GET A$ 

20 IF A$< >CHR$(65) THEN 10 
30 PRINT CHR$(88) 
können wir schreiben: 

10 GET A$ 

20 IF A$< > , Ä" THEN 10 
30 PRINT "X" 

Beide Programme sind gleichwer¬ 
tig. Nach RUN rührt sich gar nichts. 
Erst, wenn die A-Taste gedrückt 
wird (Zeile 20), druckt Zeüe 30 den 
Buchstaben X. 

In Zeile 20 können wir natürlich 
statt des A jeden beliebigen Buch¬ 
staben, Zahl oder Zeichen nehmen. 


3 REM****#***#******* Programm 3. ASCII-Code Wandler 

4 REM* *CODE-WANDLER * * 

5 REM**************** 

10 PRINT CHR$<147 > 

£0 INPUT "ItfSCII-CODE";PCI I 
30 IF ACII=0 THEN END 

40 IF ACII AND 128 THEN BILD=ACII AND 127 OR 64:GOTO 80 

50 IF NOT ACII AND 64 THEN BILD=ACI I :GOTO 80 

60 IF ACII AND 32 THEN BILD=ACII AND 35*.GOTO 80 

70 BILD =AC I 1 AND 63 

80 PRINT TAB <5) "BILDSCH,CODE: "BILD 

90 GOTO 20 
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LISTen Sie einfach die 2. Version 
der drei Zeilen, fahren mit dem Cur¬ 
sor auf das A und verändern Sie es 
Ihren Wünschen entsprechend. 
Wie ich Sie einschätze, machen Sie 
das sicher auch mit den Funktionsta¬ 
sten. 

Nein? Dann machen Sie es mal. 
Sie haben nämlich Pech, so geht es 
nicht. Aber es geht, wenn Sie sich 
mit Absicht in die Lage begeben, 
die wie vorhin beschrieben, Flüche 
auslöst. Fahren Sie mit dem Cursor 
auf den 1. Gänsefuß, tippen Sie ihn 
noch einmal ein und drücken Sie 
dann eine Funktionstaste. Siehe da, 
es erscheint ein reverses Zeichen. 
Mit RETURN wird es »fixiert«, nach 
RUN wird das X erst mit der verwen¬ 
deten Funktionstaste ausgelöst. 

Der Trick besteht also darin, 
durch eine ungerade Anzahl von 
Gänsefuß-Eingaben diesen Modus 
herbeizuführen. Es geht ebenso 
durch Drücken der INSERT(INST)- 
Taste, allerdings nur für soviele Zei¬ 
chen, wie oft sie gedrückt worden 
ist. 


Im Gänsefuß-Modus 
erscheinen alle Steuer- 
und Funktionstasten in 
reverser Darstellung 

Sie haben oben ein reverses Zei¬ 
chen für die Funktionstasten erhal¬ 
ten. Die Zeichen für die Farben und 
Cursorbewegungen, also alle »gän¬ 
gigen« Funktionen, kennen Sie in¬ 
zwischen sicher schon. Aber alle 
Steuer- und Funktionstasten? 

Es gibt zwei Möglichkeiten, diese 
Zeichen zu finden: 

Die 1. Methode verwendet entwe¬ 
der ganz primitiv im Direkt-Modus 
den Befehl: PRINT ’’ mit nachfolgen¬ 
dem Drücken der Steuer- oder 
Funktionstaste oder sehr elegant 
den Dreizeiler 

10 GET A$: IF A$= ""THEN 10 
20 PRINT CHR$(34) A$ CHR$(34) 
ASC(A$) 

30 GOTO 10 
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Auch hier ist ein kleiner 
Pfiff drin. In Zeile 20 wird 
zuerst ein Gänsefuß (34) 
gedrückt, wodurch wir 
m dem danach benann¬ 
ten Modus sind. Das 
nachfolgende A$ er¬ 
scheint im Fall einer 
Steuertaste als reverses 
Zeichen, nach dem ab¬ 
schließenden 2, Gänse¬ 
fuß gibt uns die ÄSC- 
Funktion noch den 
ASCII-Code der ge¬ 
drückten Taste, 

Mit Gänsefüßen statt 
CHR$ hätten wir ledig¬ 
lich die beiden Zeichen 
A und $ auf den Bild¬ 
schirm gedruckt. Mit 
dieser Methode erhalten 
Sie zum Beispiel für: 
ASCII-Code 17 = Wj 

Cursor Down. 

ASCII-Code 147 = n 
CLR , , ..** 

Die 2, Methode ist viel 
einfacher, Schauen Sie in 
meine ASCII-Tabelle (Ta¬ 
belle 1). Sie ist in Spalten 
zu je 32 Zeichen ange¬ 
ordnet. Die Steuerzei¬ 
chen und die Farben ste¬ 
hen alle in Spalte 1 und 5. 

Da finden Sie zum Bei¬ 
spiel über der Codezahl 
17 die Funktion »Cursor- 
Down«. Wenn Sie jetzt in 
die 3, Spalte waagrecht 
rübergehen — also den 
Wert um 64 erhöhen — 
steht da das !Q| . Oder: 
In Spalte 5 ist der Taste 
CLR die Codezahl 147 zu - 
geordnet. Zwei Spalten 
weiter (64 höher) steht 
das M 

Wenn Sie die Ergeb¬ 
nisse der 1. Methode 
oben mit aer. durch Spal- 
tenhüpfen gefundenen 
Zeichen veigleichen, se¬ 
hen Sie, daß es diesel¬ 
ben Zeichen sind, halt 
nur reversiert. 

Tabelle 1. ASCII-Code 
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VC 20 

C 64 

U 

b 




•32 


CTRL - A 

□ 

Ml 

□ 

133 


CTRL - B 

□ 

W2 

0 

•34 


CTRL - C 


1 

*33 


CTRL - D 

□ 

M4 

11 

•34 

CTRL- 

CTRL - E 

CTRL - Fl 
CTRL-1 

0 

6*5 

□ 

666 

•37 


CTRL - G 

□ 

M7 

□ 

•39 


CTRL - H 

0 

668 

a 

*46 


CTRL - I 

[ün 

|iocx| 

H9 

0 

•41 


CTRL - J 

□ 

ffl 



• 16 

•42 


CTRL - K 

□ 

• II 

0 

*43 


CTRL - L 

□ 

• 12 

□ 

IM 


CTRL - M 

rcüi 

| BtT | 

• 13 

S 

•45 


CTRL - N 

0 

□ 


G4EF 

6.4 



CTRL - 0 

□ 

• 15 

0 

M7 


CTRL - P 

□ 

111 



CTRL - Q 

[cm»] 

|m»| 

117 

tu 

*49 

CTRL - R 

CTRL - R 

fsvsl 
| 0» 1 
• 18 

e 

«6 


CTRL - S 

[CM»| 

|mkJ 

• 19 

•31 


CTRL - T 

0 

•26 

0 

«2 


CTRL - U 

□ 

•21 

*33 


CTRL - V 

□ 

•22 

ü 

♦54 


CTRL - W 

□ 

•23 

0 

*53 


CTRL - X 

□ 

624 



CTRL - Y 

□ 

•23 

m 

*57 


CTRL - Z 

□ 

•26 

□ 

*58 


CTRL - : 

□ 

•27 

□ 

•59 


CTRL - £ 

0 

•21 

E 

M 


CTRL - ] 

[Esn 

| ÜT | 
»2? 

§ 

Ml 


CTRL - 1 

0 

•36 

0 

862 


CTRL — = 

0 

jd 

0 

663 


& 
»65 *45 


19 

•67 667 


IS 

*69 669 

ES 


HB 

•7! 672 

m 

173 673 

am 


m 


*46 I /78 178 


13 

879 179 

B® 

688 688 

S® 

88'. 881 

SB 

642 882 

S9Ü 

•8 3 683 

CD® 

•8» 684 

yy 

6« 685 

yy 


m 

•89 

m 

696 


....a 

696 *96 


u\ 

M! 

03 


4 

5 

6 

7 

0 

491 

□ 

g 

B 

11 

497 *9? 

0 

E 

SS 

Ti 

•98 *98 

□ 

a 

m 

SS 

•99 *99 

|lqko 

□ 

Bi 

es 

IM IM 

□ 

□ 

BIS 

□ E 

181 III 

S 

D 

□B 

BE 

1*2 182 

0 


BE 

m 

163 183 

0 

□ 

Bi 

□e 

1*4 184 

0 

g 

m 

Qffl 

115 185 

0 



m] 

1*6 116 

0 

□ 

m 

SB 

187 117 

0 

ffl 

m 

UG 

1*8 188 

0 

□ 

DE 

189 119 

smtI 
| RET | 

ffl 

SH 

00 

11* >18 

0 

B 

00 

□ 0 

111 111 

□ 

u 

ÜB 

□ B 

0 

□ 

□ B 

MB 

113 113 

Essl 

11 1 

ffl 

MB 

QE 

114 114 

fivsl 

[ OFF | 

ffl 

□ S 

ffli 

115 US 

[Ml 

[sctmJ 

ffl 

Bi 

CCD 

0 

D 

El CD 

□ 0 

117 117 

0 

E 

QO 

118 116 


□ 


@0 

119 119 

[mäk] 

|BgY| 

□ 

SIB 


[*F| 

M 

n 

äs 

□ ffl 

121 121 


u 

□ ffl 

m 

0 

□0 

ffli 

b 

123 

rrn 

|6KY| 

B 

ffl 

B 

124 

S 

□ 

B 

CD 

12! 

[BWl 

[leftJ 

ffl 

CD 


0 

E 


as 

0 

S 

ass 

127 |27 

139 

191 

223 223 


E 

225 

a 

226 

□ 

227 

□ 

228 

□ 

229 

□ 


wm 

233 233 

□ 

234 

ffl 

235 

□ 

236 

0 

237 

ffl 

238 

□ 

239 

□ 

246 

0 

241 

B 

242 

0 

243 

c 

244 

E 

245 

□ 

246 

□ 

247 

n 

248 

a 

249 

□ 0 

256 256 

b 

251 

□ 

252 

0 

253 

E 

äa 


— 


“ 7 1»H4 
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1 

Ml 

B 

B 

B44 

B 

Mi 

BB 

1 

a 

■ 

0 ü 

0 

10 

E 

SIS) 

fl 

GS 

a 

Ü 

0 


a 

bb 

Jfl 

OS 

B 

0 ü 

1 

BS 

□ 

bb 

□ 

BB 

■ 

li 

11 

m 

□ 


& 

BB 

1 

El ü 


□ E 

•il IM 

□ 

iS 

0 

Bl 

■ 

BEI 

Mi Mi 


BB 

171 «7B 


IQ 

134 131 

B 

Bl 


00 

□ 

IDE 

□ 

SEI 

H 

HB 

■ 

BE 

0 

dB 

•72 »72 

Q 

&na 

131 13* 

1 

ns 


SS 

0 

BCD 

175 173 

m 

sa 

137 137 

B 

SB 

m 


S 

CSBQ 

•74 «74 

□ 

sa 

I3B 13B 

U 

BB 

n 

BE 

a 

BB 

CB 

1319 

fl 

Bl 

i! 

m 

□ 

CE 

Q 

BB 

B 

Bl 

■ 

0® 

s 

Si 

Q 

SB 1 

fl 

BQ 

1! 

00 

□ 

00 

a 

&H3 

112 112 

fl 

IS 

81 


0 

□ 0 

□ 

SB 

S 

HB 


0® 

i 

MB 

□ B 

Mi Mi 

□ 

112 

m 

Hi 144 

B 

Bl 

K 

0@ 

a 

Ml 

11 

Ml Ml 

a 

113 

BEI 

1« 113 

0 

□ B 

fl 

00 

m 

HB 

QB 

M7 IS 3 

a 

114 

Bl 

144 144 

1 

Bl 

fl 

El® 

E 

ai 

ffl 

SB 

i 

Sul 

fl 

m 

a 

CCD 

E 

BQ 

a 

ifl 

« 

00 

s 

BJJ 

q o 

M3 M- 

E 

117 

BB 

i« in 

a 

fl iS 

a 


E 

Hi 

00 

Mi Ni 

□ 

118 

BIB 

13« 151 

B 

BB 

i 

Hä® 

0 

M5 

[0 0 

M7 M? 

□ 

111 

(SIE 

131 131 

fl 

0111 

b 


1 

IM 

SB 

Ml HB 

n 

12« 

m 

132 132 

1 

fl Bl 

H 


B 

•57 

□ca 

Mi Mi 

a 

121 

m 

133 133 

s 

■ fl 

B 

m 

0 

KB 

iE 

m Mi 

□0 

127 122 

iS 

134 131 

1 

GS 

BS 

03 

□ 

•39 

a 

□ 

B 

b 

fl 

a 


s 

MB 

E 

□ 

fl 

s 

I 


QD 


a 

HJ 

a 

B 

s 

» 

a 

ffl 

a 

M2 

SS 

B 

fl 

& 

m 

a 

S 

NI 

0 

M3 

as 

B»! BH 

s 

127 

a 

134 

b 

ui 

223 223 

0 

233 
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Kurse 


Tabelle 3. Bildschirm-Code 

Machen wir die Probe: 

Mit Methode 1 erhalten wir für 
»Rot« das reverse Pfund-Zeichen 
H . In der ASCII-Tabelle finden wir 
»Rot« unter 28. Zwei Spalten weiter, 
unter 28 + 64 = 92, steht dasselbe 
Zeichen. 

Das gilt auch für alle CTRL- 
Kombinationen, nicht nur für die der 
Farben, Bei beiden Computern ent¬ 
spricht dem CTRL- ® das S , 
beim C 64 erzeugt CTRL- j: | ein 
BH . Alle Kombinationen der Buch¬ 
staben mit CTRL erzeugen diese 
Buchstaben in reverser Darstellung. 

Um das in einer kleinen prakti¬ 
schen Anwendung zu verdeutli¬ 
chen, schlage ich vor, dieselbe Auf¬ 
gabenstellung, die in Heft 5/84 so¬ 
wohl mit Tastencode-Abfrage (Pro¬ 
gramm Nummer 1 auf Seite 104/105) 
als auch mit Tastaturpuffer-Abfrage 
(Programm Nummer 4 auf Seite 135) 
gelöst wurde, noch einmal zu ver¬ 
wenden, jetzt aber die Gänsefuß- 
Methode einzusetzen. 

Um beim Eintippen des Pro¬ 
gramms unten sicherzustellen, daß 
alles klappt, habe ich statt der rever- 
sen Zeichen die Tasten angegeben 
beziehungsweise umrahmt, die 
nach dem 1. Gänsefuß gedrückt 
werden müssen. 

Das Programm schaltet, wie die 
beiden anderen Versionen auch, 
die Bildschirm-Farben mit f-1, f-2, f-3 
und @ um, 

Programm 1. Abfrage mit Gänse¬ 
fuß 

410 PRINT "SHIFT und CLR/HOME 
420 GET A$ 

430 IF A$= ,m THEN420 

440 IF A$= ” f-1 " THEN POKE 

36878,126 

450 IF A$= " f-2 ” THEN POKE 
36879,45 

460 IF A$= ” f-3 ” THEN POKE 
36879,25 

470 IF A$= " j@ ” THEN POKE 

36879,27 

480 GOTO 420 

Für den C 64 gelten in den Zeüen 
440 bis 470 andere POKE-Adressen: 

440 .POKE 53280,6:POKE 53281,7 

450 .POKE 53280,5:POKE 53281,2 

460 . POKE 53280,l:POKE 53281,1 

470 .POKE 53280,3:POKE 53281,1 

Ein letztes Problem bleibt uns 

noch. Wie schaffen wir es, daß wir 
im Gänsefuß-Modus auch Funktio¬ 
nen einsetzen können, die entweder 
keine eigene Taste haben (zum Bei¬ 
spiel 14 = Text, 8 = Lock) oder die 
beim Eintippen sofort die Funktion 
auslösen (zum Beispiel 13 = RE¬ 
TURN, 20 = DELete)? 

üJhdj* 151 
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AI.UE TASTISN- ZEICHEN- UND STIEUISRCCDIES 


Hier müssen wir eine Methode an¬ 
wenden, die meine Kinder und ich 
»finkein« getauft haben und zwar 
deswegen, weil wir sie zum ersten 
und einzigen Mal vom Commodore- 
Software-Spezialisten Andy Finkel 
im amerikanischen Handbuch ge¬ 
funden haben. 

Sein Trick besteht darin, daß er in 
einer ASCII-Tabelle das entspre¬ 
chende Zeichen für die Funktion 
heraussucht und es in mehreren 
Schritten an seinen vorgesehenen 
Platz bringt. 

Ich will Ihnen zeigen, was ich da¬ 
mit meine: 

Bitte, versuchen Sie mit der 
Gänsefuß-Methode die DELete- 
Taste in eine PRINT-Anweisung zu 
brmgen 

10 PRINT " INST/DEL " 

Sie werden es nicht schaffen, da 
die DEL-Taste, statt ein reverses Zei¬ 
chen zu drucken, ihrer Funktion 
nachgeht und das vorherige Zei¬ 
chen löscht. 

Jetzt »finkein« wir: 

1. Schritt: 

10 PRINT " ” (mit RETURN abschlie- 
ßen) 

2. Schritt: 

Mit dem Cursor auf die Leerstelle 
zwischen den Gänsefüßen fahren. 

3. Schritt: 

Aus der ASCII-Tabelle das Zeichen 
der DEL-Taste holen (T). 


4. Schritt: 

Die reverse Darstellung mit CTRL- 
REV.ON einschalten (der Cursor 
bleibt auf seiner Stelle) und das T 
drücken, mit RETURN abschließen. 
Jetzt steht das Zeichen drin und das 
Programm läuft. 

Um Ihnen den Schritt 3 für alle wi¬ 
derborstigen Funktionen zu erleich¬ 
tern, habe ich sie alle in der Tabelle 
2 zusammengefaßt. 

Da ich hoffe, daß Sie in Zukunft 
fleißig finkein werden, muß ich Sie 
noch über einen lästigen Nebenef¬ 
fekt aufklären, der bei ein paar Fin¬ 
keleien auftritt. Einige der Funktio¬ 
nen, nämlich RETURN, DELete 
(schon wieder) und das SHIFT- 
RETURN wirken nicht nur im Pro¬ 
grammablauf wie vorgesehen, son¬ 
dern auch beim LISTen, was lästig 
sein kann. (Allerdings ergeben sich 
dadurch auch ungeahnte Möglich¬ 
keiten — siehe Artikel »Synthetische 
Steuerzeichen«. Das geSHIFTete 
RETURN (ASCII-Code 14) ist sehr 
nützlich bei Platz- und Speicherman¬ 
gel. Sie können nämlich mit ” 01 ” in 
einer langen ProgräuUnzeile den 
Cursor mit nur drei Zeichen auf den 
Anfang der nächsten Zeile bringen, 
mit CHR$(141) bräuchten Sie schon 
neun Zeichen, mit SPC(...) müssen 
Sie sehr genau die Cursorposition 
berechnen, mit einer entsprechen¬ 
den Anzahl von »Cursor-Rechts«- 


Zeichen geht es auch nur mühsam. 
Also, nützlich ist SHIFT-RETURN 
durchaus! 

Nur: Beim LISTen wird es auch 
ausgeführt und die Zeile, in der es 
steht, sieht recht blöd aus. Zusätzlich 
kann eine derart geLISTete Zeile 
nicht mehr geändert werden, son¬ 
dern muß bei Verbesserungen völ¬ 
lig neu geschrieben und gefinkelt 
werden. Alles Gute hat seinen Preis! 

Soviel sei zur Methode gesagt. 
Jetzt wollen wir zur Erholung und zur 
Übung ein kleines Spiel program¬ 
mieren, in dem wir (fast) alles Ge¬ 
lernte auch anwenden. 

Eine kleine Seltenheit ist bemer¬ 
kenswert: Das Programm ist für VC 
20 und C 64 identisch! 

Die Spielaufgabe soll darin beste¬ 
hen, die ersten sieben Buchstaben 
des Alphabets möglichst in der rich¬ 
tigen Reihenfolge auf den Bild¬ 
schirm zu bringen. 


Das Rnkel-System 


Klingt einfach, aber die Buchsta¬ 
ben sollen in zufälliger Reihenfolge 
auftauchen. Zusätzlich hat der Spie¬ 
ler, falls der Buchstabe nicht der 
Reihenfolge entspricht, lediglich 
die Möglichkeit, ihn mit der DEL- 
Taste zurückzuweisen, wenn er 
schnell genug ist. Das Programm 
zählt die Felder und zeigt am Schluß 
das Ergebnis an. 

Wir brauchen dazu: 

— Einen Zufalls-Buchstaben-Erzeu- 
ger von A Pis G (ASCII-Code 65 bis 
71) 

— einen Buchstaben-Drucker 

— einen Buchstaben-Reihenfolge¬ 
zähler 

— eine Möglichkeit, die DEL-Taste 
zu drücken und damit den gedruck¬ 
ten Buchstaben rückgängig zu ma¬ 
chen 

— einen Fehlerzähler 

— eine Prüfung, ob der letzte Buch¬ 
stabe (71) erreicht ist. 

Normalerweise müßte ich jetzt ein 
Flußdiagramm zeichnen und »struk¬ 
turiert« vergehen, so wie die ausge¬ 
zeichnete Serie in diesem Heft lehrt. 
Man möge mir aber verzeihen, daß 
ich aus Erklärungsgründen in ein¬ 
zelnen Schritten vorgehe, welche 
uns erlauben, jederzeit Zwischenre¬ 
sultate mit Probeläufen zu überprü¬ 
fen (Programm 2, siehe Listing). 

Auf geht’s! 


BEDEUTUNC 

ASCII-CODE 

REVERSE 

DARSTELLUNG 

FINKELN 

LOCK 

(Sperre der Zeichen- 
satz-Umschaltung 

8 

sa 

H 

UNLOCK 

(Sperre 

aufheben) 

9 

i) 

I 

RETURN 

13 

lil 

M 

TEXT 

(2. Zeichen¬ 
satz) 

14 

oa 

N 

DEL 

(Zeichen 

löschen) 

20 

D 

T 

SHIFT RETURN 
(Cursor auf 

Anfang der 
nächsten Zeile) 

141 

1 

SHIFT M 

GRAF 
(1. Zeichen¬ 
satz) 

142 

9 

SHIFT N 


»Finkein« eingetippt werden können 
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Den Buchstaben-Erzeuger und 
-drucker erhalten wir durch Zeile 
50, welche für eine Variable A zufäl¬ 
lige ASCII-Codes zwischen 65 und 
71 erzeugt, sowie durch Zeile 70, die 
das Zeichen für den ASCII-Code 
ausdruckt. 

50 A = INT(RND(0)*7) + 65 
70 PRINT CHR$(A); 

Für weniger Versierte sei gesagt, 
daß RND(O) eine Zufallszahl zwi¬ 
schen 0 und 0,99 erzeugt, mit 7 multi¬ 
pliziert gibt das eine Zahl zwischen 0 
bis 6,93. Die Funktion INT macht 
daraus eine ganze Zahl, zwischen 0 
und 6, mit 65 addiert letztlich eine 
Zahl zwischen 65 und 71 — ASCII- 
Werte der Buchstaben A bis G. 

Den Ausdruck der Buchstaben 
nebeneinander erreichen wir 
durch das Semikolon in Zeiel 70, die 
laufende Wiederholung durch ei¬ 
nen Rücksprung in Zeile 320. 

320 GOTO 50 


Damit es nicht zu schnell geht, ver¬ 
zögern wir das Ganze mit einer War¬ 
teschleife in Zeile 80. 

80 FOR T= 1 TO 1000:NEXT T 

Probieren Sie es mit RUN aus. Zei¬ 
le 80 übrigens erlaubt Ihnen später 
den Schwierigkeitsgrad zu verän¬ 
dern. 

Die geforderte richtige Reihenfol¬ 
ge der Buchstaben A, ich nenne sie 
hier R, setzen wir am Anfang auf 65 
und erhöhen sie schrittweise um 1. 

30 R = 65 
310 R = R + l 

In Zeile 60 prüfen wir, ob die End¬ 
zahl 71 für das G überschritten ist. 
Wenn ja, springen wir auf Zeile 400, 
mit der wir das Spielende anzeigen, 

60 IF R > 71 THEN 400 
400 PRINT ” 

SPIELENDE' 


Bitte RUNnen Sie das Fragment 
wieder zur Probe. 

Jetzt kommt die Beeinflussung der 
Reihenfolge mit der DEL-Taste. Wie 
gelernt fragen wir diese Taste mit ei¬ 
ner GET-Schleife ab (Zeilen 100,110), 
ihre Lösch-Wirkung erreichen wir in 
Zeile 120 durch einen PRINT-Befehl 
(mit Semikolon!). Nach Drücken der 
DEL-Taste darf der Reihenfolge- 
Zähler der Zeile 310 natürlich nicht 
wirken, deshalb springen wir schon 
vorher aus der Zeile 210 zurück. 

100 GET A$ n 

110 IF A$<>" *1 "THEN 300 

120 PRINT " U 

210 GOTO 50 


Sie sehen oben, daß ich für die 
Abfrage der DEL-Taste die Finkei- 


Methode vorschlage. Die anderen 
Methoden gehen natürlich auch. 

Nach RUN springt das Programm 
auf die noch nicht existierende Zeile 
300 (was prompt zur Fehlermeldung 
führt), es sei denn, Sie drücken 
rechtzeitig die DEL-Taste. 

In der Zeile 300 wollen wir prüfen, 
ob ein Fehler gemacht wurde, das 
heißt ob A mit der Reihenfolge R 
übereinstimmt. Im Fehlerfall wird 
die Fehlerzahl F um 1 erhöht. Vorher 
aber muß F auf 0 gesetzt werden. 

20 F=0 

300 IF A< >R THEN F=F+1 
Sie können jetzt schon das Spiel 
üben. Aber es fehlen noch ein paar 
Feinheiten. 

10 PRINT CHR$(147) 

410 PRINT F "Fehler" 

Zeile 10 ist klar, Zeile 410 druckt 
am Spielende die Fehlerzahl F aus. 

Aber es gibt noch einen Fehler 
des Spielers, nämlich wenn er aus 
Versehen einen richtigen Buchsta¬ 
ben zurückweist. Deshalb fragen 
wir nach erfolgtem Drücken der 
DEL-Taste in den Zeüen 100 bis 120 
nach, ob der Buchstabe tatsächlich 
falsch war. Wenn nicht, wird die Feh¬ 
lerzahl F um 1 erhöht. 

200 IF A = R THEN F = F+1 
Damit uns nach RUN der erste 
Buchstabe nicht überrascht, verzö¬ 
gern wir sein Erscheinen mit 
40 FOR T= 1 TO 600: NEXT T 
Zum Finkeln-Üben arrangieren 
wir die Anzeige des Spielendes und 
der Fehler etwas um. Alle Anwei¬ 
sungen sollen in nur einer Zeile ste¬ 
hen. Löschen Sie bitte die Zeile 410. 
In Zeile 400 wird gefinkelt und zwar 
mit dem Zeichen für SHIFT RE¬ 
TURN, welches laut Tabelle 2 mit 
SHIFT M erzeugt wird. 

400 print ggiH&glill das 

SPIEL IST ZU ENDE";"1BJHIHH : 
F "FEHLER". 

Bei LIST und bei Ausdruck mit ei¬ 
nem Drucker sehen die gefinkelten 
Zeilen 110, 120 und 400 natürlich ku¬ 
rios aus und wie gesagt, sie lassen 
sich bei einem Tippfehler nicht kor¬ 
rigieren, sondern müssen neu ge¬ 
schrieben werden. 


Der Bildschirm-Code 


Der Vollständigkeit halber will ich 
noch die letzte der vorher genann¬ 
ten drei Methoden, ein Zeichen auf 
den Bildschirm zu bringen, erwäh¬ 
nen, insbesondere, weil der dabei 


verwendete Bildschirm-Code (auch 
Video-Code genannt) oft zu Ver¬ 
wechslungen mit dem ASCII-Code 
führt. 

Auf Anhieb ist es auch nicht einzu¬ 
sehen, warum Commodore einen 
anderen Code verwendet, wenn ein 
Zeichen direkt auf den Bildschirm — 
oder genauer gesagt in den Bild¬ 
schirm-Speicher — gePOKEt wer¬ 
den soll. 

Der Grund dafür liegt darin, daß 
dem ASCII-Code nicht nur Zeichen 
zugeordnet sind, sondern auch Far¬ 
ben und Funktionen. Außerdem 
sind im ASCII-Code die reversen 
Zeichen nicht enthalten, sondern 
müssen — wie Sie ja inzwischen wis¬ 
sen —jeweüs umgeschaltet werden. 
Das alles ist für ein Betriebssystem 
viel zu kompliziert. 

Es ist viel einfacher, im Festspei¬ 
cher (ROM) alle Zeichen der zwei 
Zeichensätze fest zu verankern, von 
wo sie das Betriebssystem heraus¬ 
holen und auf den Bildschirm brin¬ 
gen kann. 

Die Reihenfolge der Zeichen und 
ihr Code sehen Sie in der Tabelle 3. 
Sie ähnelt in mehreren Bereichen 
der ASCII-Reihenfolge, einige Spal¬ 
ten sind sogar identisch, Das macht 
eine Umrechnung — auch für das 
Betriebssystem — sehr emfach. 

Folgende Blöcke der beiden Co¬ 
dearten entsprechen einander: 


ASCII-CODE BILDSCHIRM-CODE 


0- 31 

entspricht 
keinem Zeichen 

32- 64 

32- 64 

64- 95 

0- 31 

96 - 127 

192 - 223 

64- 95 

128 - 159 

entspricht 
keinem Zeichen 

160 - 191 

224 - 255 

96 - 127 

entspricht 

keinem 

128 - 255 

ASCII-Code 



Ein Programm zur Umrechnung 
von ASCII-Code in Bildschirm-Code 
sieht dementsprechend aus wie in 
Programm 3 (VC 20 und C 64). 

Dabei habe ich als Variable ge¬ 
wählt: 

- ACH = ASCII-Code 

— Bild = Bildschirm-Code 

Im Hinblick darauf, daß unser 
Hauptthema die Abfrage der Tasta¬ 
tur ist, soll uns dieser Ausflug genü¬ 
gen. 

(Dr. Helmut Hauck) 
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Ein Precom- 


piler für Basic- 
Programme 
Heil 4) 


In der heutigen letzten Folge wollen wir 


einige Teile des Programmes Strubs genauer ansehen und unter- 
wie man das Programm um zusätzliche Funktionen erweitern kann. 


suchen, 

Dabei werden wir sehen, daß ein 
solches Übersetzungsprogramm auch für ganz andere 

Aufgaben eingesetzt werden kann. 


I n den vorausgehenden Folgen 
wurde bereits erwähnt, daß die 
strukturierte Programmierung 
vor allem Vorteile in bezug auf War¬ 
tung, Änderungen und Erweiterbar¬ 
ke it von Programmen bietet Dies 
gilt auch für das Programm Strubs. 
Um in den Genuß dieser Vorteile zu 
gelangen, ist allerdings der Zugang 
zum Quellprogramm erforderlich. 
Wenn Sie sich das in Heft 5 abge¬ 
druckte Objektprogramm ansehen, 
werden Sie feststellen, daß es auch 
nicht viel aussagekräftiger als ein 
unkommentiertes Assemblerlisting 
ist. Wenn Sie an der Entwicklung ei¬ 
gener Programmerweiterungen in¬ 
teressiert sind, sollten Sie sich des¬ 
halb beim Verlag das Quellpro¬ 
gramm besorgen. Da ich hier davon 
ausgehen muß, daß die meisten Le¬ 
ser das Quellprogramm nicht besit¬ 
zen, lohnt es sich gar nicht erst, sy¬ 
stematisch die einzelnen Pro¬ 
grammteile vorzustellen. 

Statt dessen wollen wir nur die für 


Programmerweiterungen wichtig¬ 
sten Programmelemente vorstellen 
und anhand einiger exemplarischer 
Erweiterungen, die auch, ohne sich 
weitere Gedanken zu machen, ein¬ 
fach eingetippt werden können, auf¬ 
zeigen, wie man Erweiterungen im¬ 
plementieren kann und was dabei 
zu beachten ist. Aus dem gleichen 
Grund geben wir nur die Änderun¬ 
gen an, die im Objektprogramm vor¬ 
zunehmen sind. Eine Anpassung an 
das Quellprogramm dürfte keine 
Probleme bereiten. 

Achten Sie bei allen Programm¬ 
änderungen darauf, daß das geän¬ 
derte Programm abgespeichert 
wird, bevor es zum ersten Mal ge¬ 
startet wird, da das Programm den 
Zeiger auf das Programmende ver¬ 
stellt. Sollte das Programm durch Er¬ 
weiterungen so lang werden, daß es 
in den Editbereich hineinreicht, 
kann der Anfang des Editbereichs 
in Schritten zu 256 Byte nach oben 
verschoben werden, um Platz zu 


schaffen. Dazu ist in den Zeilen 70 
bis 80 die Zahl 40 überall, wo sie auf¬ 
taucht, durch eine größere Zahl (je¬ 
weils 4 für jedes Kilobyte) zu erset¬ 
zen (vgl. auch den Schluß der 3. 
Folge). 

Die wichtigsten 
Programmelemente 

Eine grobe Übersicht über den 
Aufbau des Programms haben wir 
bereits in der 2. Folge gegeben. Be¬ 
vor wir uns nun mit einzelnen Erwei¬ 
terungen beschäftigen, wollen wir 
zunächst emmal die wichtigsten Pro¬ 
grammelemente vorstellen, die man 
für Änderungen und Erweiterungen 
des Programms benötigt. Wie be¬ 
reits erwähnt, liest Strubs das Quell¬ 
programm zweimal vom Anfang bis 
zum Ende durch. Um Zeit zu sparen, 
wird im 1. Lauf nur jeweils der An¬ 
fang einer Zeile untersucht, Deshalb 
müssen alle Befehle, die bereits im 
1. Lauf zu behandeln sind, auch am 
Anfang einer Zeile stehen, während 
Befehle, die nur im 2. Lauf behandelt 
werden, überall stehen können. Ein 
Beispiel; 

Die Definition von Marken muß 
am Zeilenanfang erfolgen, während 
der Aufruf von Marken an jeder Stel- 
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chen), und NC zeigt auf das nächste 


le erfolgen kann. Die Aufgabe des 1. 
Laufs besteht darin, verschiedene 
Tabellen anzulegen, mit deren Hilfe 
dann im 2. Lauf das endgültige Ob¬ 
jektprogramm erzeugt wird. 

Jede dieser Tabellen besteht aus 
einem oder mehreren Array(s), ei¬ 
ner Variablen, deren zweiter Buch¬ 
stabe ein »M« für »Maximal« ist und 
die Dimension, das heißt die maxi¬ 
male Zahl von Einträgen festlegt, 
und aus einer Variablen, deren 
zweiter Buchstabe ein »P« für »Poin¬ 
ter« ist und die auf den jeweils näch¬ 
sten freien Listenplatz zeigt. Bei 
Speicherplatzproblemen brauchen 
nur die Werte der Dimensionsvaria- 
blen im Imt-Teil geändert zu werden. 
Möchte man zum Beispiel mehr als 
99 Marken (die jetzige Maximalzahl) 
benutzen, dann schreibt man in Zei¬ 
le 45060 zum Beispiel »MM = 150:.,.«. 

Die Tabellen werden in den Zei¬ 
len 45050 bis 45200 definiert (Bild 1). 
Die Dimension des Stacks bestimmt 
die mögliche Schachtelungstiefe. 
Dazu kommen die Tabellen der neu¬ 
en Befehle (Zeile 45260 bis 45274) 
und der Fehlermeldungen (Zeile 
45480 bis 45514). 


nächsten zu lesenden Zeichens. Im 
2. Lauf wird zeilenweise das Objekt¬ 
programm erzeugt, wobei die je¬ 
weils aktuelle Zeile in der Varia¬ 
blen Z$ aufgebaut wird. Dabei ent¬ 
halten die beiden ersten Zeichen 
von Z$ Low- und Highbyte der Zei¬ 
lennummer (so wie sie später im 
Speicher steht), und das letzte Zei¬ 
chen der fertigen Zeile besteht aus 
dem Zeichen CHR$(0). 

Die relevanten Zeichencodes, auf 
die Strubs reagiert, werden in den 
Zeilen 45240 bis 45254 definiert (Bild 
2). Die Variable ZA enthält die 
Adresse des Anfangs der Zeile, die 
gerade bearbeitet wird. In EA steht 
die Startadresse des Editbereichs. 

Damit kommen wir zu den für Er¬ 
weiterungen wichtigen Modulen 
von Strubs. Die Prozedur »NEXT- 
CHAR« sucht ab Adresse NC das 
nächste relevante Zeichen des 
Quellprogrammtextes und liefert 
dessen Code in der Variablen C. Da¬ 
bei werden Leerzeichen (Zeile 250) 
und Kommentare (Zeile 280-295) 
überlesen. Strings werden direkt in 
die Ausgabezelle Z$ übertragen 
(Zeile 350). Der Zeiger NC wird auf 
das nächste zu lesende Zeichen ge¬ 
setzt. Die Prozedur »HOLNAME« 


Zeichen. 

Die Prozedur »SCHREIBZEILE« 
(Zeile 550-580) generiert auf der Dis¬ 
kette aus den nacheinander einge¬ 
gebenen Zeilen Z$ das zusammen¬ 
hängende Objektprogramm und 
gibt die Nummer der aktuellen Zei¬ 
le auf dem Bildschirm aus. Die Va¬ 
riable AA (Linkadresse) darf außer¬ 
halb dieser Routine nicht verändert 
werden! 

Die Prozedur »ERROR« (Zeile 8050 
bis 8099) erwartet als Eingabe einen 
Fehlercode ER. Dabei handelt es 
sich um den Index der Fehlermel¬ 
dung in der Tabelle der Fehlermel¬ 
dungen. Die Zeilennummer und die 
Fehlermeldung werden auf dem 
Bildschirm ausgegeben und zu¬ 
gleich in eine Fehlertabelle einge¬ 
tragen, die man sich nach der Über¬ 
setzung auf Bildschirm oder 
Drucker ausgeben lassen kann. Zu¬ 
sätzlich wird die Fehlermeldung in 
die Ausgabezelle Z$ geschrieben, 
so daß sie auch im Objektprogramm 
erscheint. Die Übersetzung wird mit 
der folgenden Zeile fortgesetzt. 

Die Prozedur »ABBRUCH« (Zeile 
50000 bis 50030) sorgt für einen kon¬ 
trollierten Abbruch der Überset¬ 
zung, Sie erwartet ebenfalls als Ein- 


45240 ' m RELEVANTE ZEICHENCODES M 

45250 DP-RSC C" '•"} '• K0 / MMENTAR / =RSC <" y ") : LA ' BEL y «ASC<" £" >: NU$=CHR$ < 0 ) : BL =RSC <" ": 

45253 BE y FEHL y = ASC<"! 1 ') ; TE y KT <"" > •" =34: G y 0 ' T y G-CQDE y $»CHR$ < i 37) 

45254 IF ■" CÜBE / (133): TH ■" EN-CODE x »167* HO y T'$=CHRt-C i 68) • K •" DM'MA-C0DE y =44 


Bild 2. Relevante Zeichencodes 


13 rem mm li ster-demo mmmmmmm 
30 pr t nt " 

20 REM WIRD ZU'- 

30 RRT NT•'<CBXCRXCUXCLXRQNXROFXHQ>TEST<BELXI NSXWHTXREBXORW' 
URXVELXCVNO" 


:bluxblkxp 


REflDV. 


Bild 3. Beispiellister 


Dem schrittweisen Lesen des 
Quellprogramms dienen die Varia¬ 
blen C und NC. Die Variable C ent¬ 
hält den Code des jeweils zuletzt ge¬ 
lesenen Zeichens, wobei der Wert 0 
ein Zeilenende markiert. Die Varia¬ 
ble NC enthält die Adresse des 


(Zeile 750-830) liest ab aktueller 
Adresse NC einen Namen (zum Bei¬ 
spiel Befehl, Label) und zwar bis ei¬ 
nes der Trennzeichen »:«, »,«, Blank 
oder Zeilenende erscheint. Der Na¬ 
me wird m der Variablen T$ ausge¬ 
geben, C enthält das erste relevante 


gäbe den Fehlercode ER und gibt 
die entsprechende Fehlermeldung 
aus. Danach wird die Tabelle der 
bisher bemerkten Fehler ausgege¬ 
ben, offene Files ordnungsgemäß 
geschlossen und Strubs neu gestar¬ 
tet. 
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Die Prozedur »WARTEN« (Zeile 
49550 bis 49570) fordert den Benut¬ 
zer auf, eine Taste zu drucken und 
wartet auf den Tastendruck. 

Die Prozedur »INIT« (Zeile 45050 
bis 45999) enthält die Definition der 
Variablen und Tabellen sowie die 
Interpretererweiterung. 

Im »MENÜ« (Zeile 40050 bis 40495) 


ein Unterprogramm auf. Falls der 
Befehl nicht in der Tabelle gefun¬ 
den wird, wird eine entsprechende 
Fehlermeldung ausgegeben. Im 1. 
Lauf kommt noch die Ausgabe der 
Blockstruktur hinzu. Hierzu dient die 
Variable In (für Indentmodus). IN - 0 
bedeutet, auf der gleichen Schach¬ 
telungsebene zu bleiben. 


können die verschiedenen Funktio¬ 
nen angewählt werden. 

Die Prozeduren »BEFEHLE IM 1. 
LAUF« (Zeile 1550-2497) und »BE¬ 
FEHLE IM 2. LAUF« (Zeile 2550-3640) 
werden von Strubs aufgerufen, so¬ 
bald im Quellprogramm das Erken¬ 
nungszeichen »!«für Befehle (Code 
in der Variablen BE) entdeckt wird. 
Sie holen den Namen des Befehls, 
suchen diesen m der Befehlstabelle 


Damit haben wir nun das notwen¬ 
dige Wissen zusammen, um an dem 
Programm Strubs emige Änderun¬ 
gen und Erweiterungen vorzuneh¬ 
men. 


Andere Anwendungen 

Bei den Programmtexten, die 
Strubs übersetzt, handelt es sich 



zwar um erweiterte Basicprogram- 
me, aber nichtsdestoweniger um Ba- 
sicprogramme. Deshalb ist es rela¬ 
tiv einfach, Strubs auch zur Bearbei¬ 
tung ganz normaler Basic-Program- 
me einzusetzen. Zwei sinnvolle Mög¬ 
lichkeiten wollen wir im folgenden 
vorstellen. 

1. Em SPEED-UP-Programm, um nor¬ 
male Basicprogramme schneller zu 
machen. 

2. Ein Programm, das besser lesba¬ 
re Listmgs erstellt. 

Dabei ist zu beachten, daß die Än¬ 
derungen, die wir dazu vornehmen, 
nicht wie die Makro-Funktion eine 
Erweiterung des eigentlichen Pro¬ 
grammes Strubs und seiner Funk¬ 
tion darstellen, sondern daß wir 
zwei völlig neue Programme mit völ¬ 
lig neuen Aufgaben erhalten. Des¬ 
halb sollten auch die erhaltenen 
Programme unter neuen Namen, 
beispielsweise »SPEED-UP« und »LI- 
STER«, abgespeichert werden. Das 
Arbeiten mit diesen Programmen 
unterscheidet sich nicht von der Ar¬ 
beit mit dem »normalen« Strubs- 
Programm. 


Schnelleres Basic 


Zunächst wollen wir Strubs so än¬ 
dern, daß es normale Basicpro¬ 
gramme in Programme übersetzt, 
die keine Leerzeichen und Kom¬ 
mentare mehr enthalten und da¬ 
durch schneller ablaufen. Wie Sie 
sich erinnern werden, benutzt 
Strubs für Kommentare, die gelöscht 
werden sollen, em eigenes Zeichen 
»'«. Kommentare, die mit REM ge¬ 
kennzeichnet werden, bleiben im 
Objektprogramm erhalten. Da 
Strubs bereits alle Blanks entfernt 
(außer in Strings), brauchen wir nur 
noch dafür zu sorgen, daß Strubs auf 
das REM-Token reagiert wie bisher 
auf das Kommentarzeichen»’«. Die 
relevanten Zeichencodes, auf die 
Strubs reagiert, werden in den Zei¬ 
len 45250 bis 45254 definiert (Bild 2). 
Wir brauchen nur in Zeile 45250 das 
KO = ASC(» ’«) durch KO -143 (143 ist 
das REM-Token) ersetzen und schon 
ist das Speed-Up-Programm fertig. 
Genauso können Sie die Erken¬ 
nungszeichen für Label und die neu¬ 
en Befehle ändern. Dies ist, um Kon- 
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die Zeilen zu lang werden. Deshalb 


auf einen Blick 


flikte zu vermeiden, für den Fall 
sinnvoll , daß Sie mit Strubs Program¬ 
me für Interpretererweiterungen 
übersetzen, die ihrerseits »!« oder 
das Pfundzeichen als Erkennungs¬ 
zeichen für ihre neuen Befehle be¬ 
nutzen. 


Listings 


Wollen Sie im »64’er« eigene Pro¬ 
gramme veröffentlichen? Dann kön¬ 
nen Sie den Lesern viel Ärger er¬ 
sparen, wenn Sie das Listing vorher 
mit dem Programm »LISTER« aufbe¬ 
reiten. »LISTER« übersetzt Basic- 
Programme in Programmtexte, in 
denen die schwer entzifferbaren 
Steuer- und Grafikzeichen inner¬ 
halb von Strings durch lesbare Wor¬ 
te »(CDOWN)« oder »(HOME)« er¬ 
setzt sind (Bild 3). 

Dazu ändern wir eine Zeile inner¬ 
halb der Prozedur »NEXTCHAR«. In 
Zeile 350 werden gelesene Zeichen 
mit dem ASCII-Code C innerhalb 
von Strings direkt in die Ausgabezei¬ 
le Z$ übertragen. Wenn wir nun in 
Zeile 350 Z$=Z$ + CHR$(C) durch 
Z$ = Z$ + C$(C) ersetzen, dann kön¬ 
nen wir ein Array C$(255) definie¬ 
ren, das in jedem ASCII-Wert den 
String enthält, der dafür im Objekt¬ 
programm erscheinen soll. Die Defi¬ 
nition dieses Arrays gehört in das 
Modul »INITIALISIERUNG«: 

45300 DIM C$(255):FOR 1 = 0 TO 
255:C$(I) = CHR$(I):NEXT 

Damit haben wir zugleich unser 
Array mit den normalen Werten vor¬ 
besetzt. Jetzt bleiben nur noch die 
Ersetzungen: 

45310 

C$(17)= "(CDOWN) ”:C$(19) = ” (HO¬ 
ME)” 

45312 

C$(28) = ’ ’ (ROT)": C$(31) =" (BL AU) ’ ’ 

... usw. 

Hier können Sie nun jedem Zei¬ 
chen ein beliebiges Wort zuordnen: 
Den ASCII-Code der einzelnen Zei¬ 
chen finden Sie im C-64 Handbuch 
auf S, 135 oder Sie können ihn ein¬ 
fach durch Eingabe von 
PRINT ASCCX") 

feststellen, wobei »X« für das interes¬ 
sierende Zeichen steht. Bei sehr vie¬ 
len Zeichen innerhalb eines Strings 
kann es allerdings Vorkommen, daß 


sollten die Worte möglichst kurz ge¬ 
wählt werden. 


Makros 


An einem etwas umfangreicheren 
Beispiel wollen wir nun zeigen, wie 
man neue Strubs-Befehle imple¬ 
mentiert und wie man die Prozedu¬ 
ren von Strubs benutzen kann. Dies 
soll am Beispiel einer Makro- 
Funktion demonstriert werden. 

Makros, vor allem von Assem¬ 
blern her bekannt, stellen so etwas 
wie Abkürzungen für kurze Pro¬ 
grammausschnitte dar. Dadurch 
verringert sich die Tipparbeit und 
vor allem werden die Quellpro¬ 
gramme übersichtlicher. 

In der Makro-Definition wird em 
Makro-Name definiert und diesem 
ein Programmstück zugeordnet. 
Überall, wo nun im Quellprogramm 
ein Makro auf ge rufen wird, er¬ 
scheint im Objektprogramm an die¬ 
ser Stelle das entsprechende Pro¬ 
grammstück. Ein einmal definiertes 
Makro kann wie ein Label beliebig 
oft aufgerufen werden. 

Für die Definition eines Makros 
wollen wir den Befehl »IDMAKRO« 


und für den Aufruf eines Makros 
den Befehl »!M« wählen. Ein Beispiel 
mag die Wirkungsweise der neuen 
Befehle demonstrieren: 

10 !DMAKRO:NAME SYS 833:X = 
PEEK (878) 

200 PRINT X:!M,NAME:PRINT X 

Die Definitionszeile 10 wird ge¬ 
löscht, da sie nur für die Überset¬ 
zungnotwendige Informationen ent¬ 
hält. Die Zeile 200 mit dem Makro- 
Aufruf sieht im Objektprogramm fol¬ 
gendermaßen aus. 

200 PRINTX:SYS833:X = PEEK(878): 
PRINTX 

Einige Beispiele für Makros und 
deren korrekte Benutzung sowie 
das sich ergebende Objektpro¬ 
gramm zeigt Bild 4. Vor allem ist dar¬ 
auf zu achten, daß Makronamen wie 
alle Befehls- und Labelnamen mit ei¬ 
nem der Trennzeichen abgeschlos¬ 
sen werden müssen. Insbesondere 
darf bei der Makrodefinition und 
beim Aufruf mit nachfolgenden Pa¬ 
rametern (Spritemakros in Zeile 120 
und 130) nicht das Blank hinter dem 
Makronamen vergessen werden! 
Jede Makrodefinition, benötigt eine 
eigene Zeile. Eine Übergabe von 
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Parametern an ein Makro ist nicht 
möglich. Achten Sie bei der Arbeit 
mit Makros darauf, daß die entste¬ 
henden Zeilen des Objektpro¬ 
gramms nicht zu lang werden. Zei¬ 
len, die länger als 80 Zeichen sind, 
lassen sich nicht mehr editieren. 
Zeilen, die länger als 256 Zeichen 
werden, führen zum unkontrollier¬ 
ten Abbruch der Übersetzung mit 
»String too long error«. In diesem Fall 
kann man mit »GOTO 50000« die 
Nummer der verantwortlichen Zeile 
erfahren und offene Files schließen. 

Um die Übersetzung zu ermögli¬ 
chen, muß im 1. Lauf eine Tabelle 
der Makronamen und der zugehöri¬ 
gen Programmausschnitte angelegt 
werden. Im 2. Lauf werden dann alle 
Aufrufe durch den zugehörigen Text 
ersetzt, Die Verteilung auf zwei Läu¬ 
fe bietet den Vorteil, daß ein Makro 
(ebenso wie Labels) auch schon vor 
der Definition aufgerufen werden 
kann, 

Zur Implementation sind folgende 
Schritte erforderlich: Zunächst muß 
dem Übersetzungsprogramm mit¬ 
geteilt werden, daß es zwei neue Be¬ 
fehle gibt. Dann müssen wir die not¬ 
wendige Tabelle definieren und 
auch entsprechende Fehlermeldun¬ 
gen vorsehen. Diese Erweiterungen 
gehören in den INIT-Teil. 

Schließlich muß noch dafür ge¬ 
sorgt werden, daß Strubs weiß, wie 
es im 1. und 2. Lauf auf die neuen Be¬ 
fehle zu reagieren hat. 

Die Befehlstabelle wird in Zeile 
45265 definiert. Hier erhöhen wir 
die Zahl der Befehle um 2 und fügen 
dann noch eine DATA-Zeile mit den 
beiden neuen Befehlsnamen ein: 
45265 BM = 15:... 

45275 DATA DMAKRO,M 

Wählt man Befehlsnamen, die re¬ 
servierte Basic-Worte enthalten, 
dann müssen die Tokens berück¬ 
sichtigt werden (wie dies für IF in 
der Zeile 45271 geschieht). Für ei¬ 
nen Befehl »DEFMAKRO« wäre zum 
Beispiel 

BE$(14) = CHR$(150) +"MAKRO” zu 
setzen (1.50 = DEF-Token). 

Für die Tabelle wählen wir ein Ar- 
ray NA$(NM,1), da der Name M be¬ 
reits für die Markentabelle verge¬ 
ben ist. Die Dimension (..,0) soll die 
Namen und die Dimension (..,1) den 
zugehörigen Text aufnehmen. 

45155 NM = 40:DIM NA$(NM,1): 

NP = 0 



CROSS 

REFERENCE MRP 

STRUBS.4.0P 

PRÖE 

RR 

560* 565 570 5120* 

5130 




RHO 

555 1125 1574 1635 

2100 

2269 5052 5929 

6:l@0 

6550 

6655 

8050 3060 45410 50008 





Bi 

1565* 1575 1577 157? 

1581 

2685* 2693 48060* 48070 

49060* 

49070 

49560* 





BR 

3470 45253* 





BEiO 

1550 45641 45255 45270* 

45271* 




BL 

250 295 795 320 

45250* 




EM 

1565 45641 2565 45265* 

45270 




C 

260* 265 280* 290* 

295 

350* 795* 300 

820 

2429 

2425 

2470 2590 3810 3036* 3400* 3470 34?5* 3818 *100 


4108 

4115 4130 4360 4330 5530* 5585 8090* 



Ci 

8090* 





BI 

1178 1685 2100 2260 

2640 

2693 3030 3099 

3490 

3639 

6100 

8060 45220* 43140 49140 





BP 

795 5585 45250* 





E 

5090* 5395 





Ei 

5990* 5095 





ER 

83* 5352 5120 5355 

6559 

8950 



EM 

3060 45480# 





EP 

5180 8060* 45480* 49950 

49119 

49129 



ER 

1160* 1565* 1600* 1605* 

1643* 

2010* 2040* 2100* 

2160* 

2275* 

2410*. 

2425* 2565* 5143* 6050* 8050 3069 8080 50008 



ERiO 

3050 8080 45400 45500* 

49140 

50008 



ERV.O 

8060* 45480 49140 





Fi 

5870* 5389 





GTi 

2640 2635 3990 45253* 





H 

1125* 1170* 1139 2260* 

2300 

2425* 2647* 2640 

3100* 

3130 

3190* 

3203 48055* 48182* 48150 49355* 49102* 49158 



HZ 565* 57ö 





T 

1140* 1169 1179 1550 

1565 

1569* 1579 2275* 

2290 

2390 

45641 

2565 2570 45270* 45599* 45693* 45610* 45658* 43129* 43140 


48158 

49120* 49140 49159 





1ZO 

2130* 2390* 3938 3390 

453.45 




ICS 

3018 3609 45254* 45271 





IM 

45145* 





IN 

1575 1577 1579 1581 

1615* 

1660* 5.680* 2925* 

2052* 

2107* 

2240* 

2320* 2485* 2628* 





IR 

2910* 2950* 3039 3036* 

3890 

3149* 6560* 45145* 



KM 

795 45254* 





KO 

265 280 6535 45250# 





L 

2647* 2648 3100* 3130 

3190* 

3200 



LR 

4100 4360 45250* 





LM 

1635 45135* 





LOZO 

1685* 2640 2693 3490 

3630 

45135 



LP 

1695* 2595* 6560* 45135* 





MRiO 

1140 6100* 45060 48140 





MRZO 

1170 6109* 45068 43140 





MM 

2410 6050 45068* 





MP 

1140 1160 2419 2468* 

6058 

6100* 45060* 45059 

4P 120 


NC 

250* 260 280* 290* 

350* 

370* 795 380* 

820* 

4088* 

4115* 

5589* 





MCi 

3010 3609 45254* 





NU* 

2640 3090 4115 8990 

43250* 




SZ< > 

2050# 2100 2275 2595* 

2649 

2693 3490 3630 

45190 


SM 

1609 2010 2160 45198* 





SP 

1609 1605* 1649* 2010* 

2049 

£050 2108 2169* 

2275 

2595* 

2630* 

2649 2693 3499 3629* 3630 5143 6569* 45190* 



Ti 

758* 800* 1120 1140 

1550 

45641 61.00 



TR 

•1575 1577* 1579 1581* 

5136* 




TE 

350 45253* 





TH 

3930 3480 3630 45254# 





W 

45609* 45610* 45650* 





X 

454J0 





74 

358* 559 560 576 

1180# 

2590# 2640* 2648* 

2685 

2693* 

301.0* 

3030* 3099* 3130* 3290* 3400* 3478* 34R0# 3430* 3690* 


3610* 

3630* 4869* 4108* 4115* 43 

m 5996* 5099 8980* 40560* 


i 40170 

401.89 49195 





ZI 

6550* 6655* 6668 





Zfi 

555 1125 1574 1685 

2160 

2268 2647 3100 

3198 

4068 

4080 

5535* 5570 5588 5920* 6100 65 

50* 6585 6655* 8830 


8060 

50003 








Bild 6. Variablenliste 
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Damit können 41 Makros definiert 
werden. Indem wir die Zahl der Feh¬ 
lermeldungen von 9 auf 11 erhöhen, 
erhalten wir die beiden neuen Feh¬ 
lercodes 10 und 11 für »zu viele Ma¬ 
kros« und »Undefiniertes Makro«. 
45480 EM = il:DIM... 

45500 FOR 1 = 0 TO EMiREAD ... 
45515 DATA ”ZU VIELE MAKROS", 
"UNDEFINIERTES MAKRO" 

Nun müssen wir in die beiden Mo- 
dule »BEFEHLE IM 1. LAUF« bezie¬ 
hungsweise »BEFEHLE IM 2. LAUF« 
jeweils zwei Routinen für die neuen 
Befehle emfügen. Da die beiden 
Verteilerzeilen bereits voll sind, le¬ 
gen wir zwei neue Verteilerzeilen 
an, die dann aber auch gleich für 10 
weitere neue Befehle Platz bieten: 
1571 IF I > 14 THEN ON 1-14 GOSUB 
2350,2380 

für den 1. Lauf und 

2571 IF I > 14 THEN ON 1-14 GOSUB 

3700,3750 

für den 2. Lauf. 

Die Routine für »IDMAKRO« im 1. 
Lauf soll zunächst prüfen, ob noch 
Platz in unserer Makro-Tabelle ist 
und, falls nicht, mit entsprechendem 
Fehlercode die Abbruch-Routine 
anspringen: 

2350 IF NP> NM THEN ER = 10: 
GOTO 50000 

Jetzt können wir mit Hilfe der Pro¬ 
zedur »HOLNAME« den Makro- 
Namen lesen und in unserer Tabelle 
speichern: 

2355 Z$= 11 ":GOSUB750:NA$(NP,0) 
= T$ 

Nun übertragen wir den Rest der 

Definitionszelle mit Hilfe von »NEXT- 
CHAR« nach Z$ (dadurch werden 
auch Strings mit übertragen. Als 
Ausgabezelle dient ZS ja erst im 2. 
Lauf). 

2360 Z$ = Z$ + CHR$(C):GOSUB 

250;IF C < > 0 THEN 2360 
Nun brauchen wir nur noch den 
Text in die Tabelle aufzunehmen, 
den Zeiger zu erhöhen und den In¬ 
dentmodus angeben, 

2370 NA$(NP,1) = Z$:NP = NP + 1:IN = 
0 

2375 RETURN 

Der Aufruf eines Makros interes¬ 
siert im 1. Lauf nicht, also: 

2380 IN = 0:RETURN 
Im 2. Lauf soll die Definitionszeile 
gelöscht werden. Dazu löschen wir 
den Ausgabestring und weisen C 
den Code für Zeilenende zu: 

3700 Z$ =" ":C = 0:RETURN 


Beim Aufruf eines Makros mit»!M« 
holen wir zunächst den Namen des 
Makros mit »HOLNAME« und su¬ 
chen ihn in der Tabelle: 

3750 GOSUB 750 

3755 FOR 1 = 0 TO NP: IF NA$(I,0) 
< >T$ THEN NEXT 

Falls der Name nicht gefunden 
wird, erfolgt ein Sprung zur Error- 
Routine mit dem Code für »Undefi¬ 
niertes Makro«: 

3760 IF I>NP THEN ER = 11: GOTO 
8050 

Nun ist nur noch das definierte 
Programmstück in die Ausgabezei¬ 
le zu übertragen: 

3760 Z$ = Z$ + NA$(I,1):RETURN 

Dadurch, daß diese Makro- 
Erweiterung Zeile für Zeile bespro¬ 
chen wurde, um zu zeigen, wie man 
die von Strubs vorgegebenen Proze¬ 
duren benutzen kann, ist vielleicht 
der Eindruck entstanden, eine sol¬ 
che Erweiterung sei relativ kompli¬ 
ziert. Wenn Sie sich aber das Ganze 
noch einmal genauer ansehen, kön¬ 
nen Sie feststellen, daß für U: Im¬ 
plementation neuer Befehle im Prin¬ 
zip nur drei Schritte erforderlich 
sind: 

1. Eintrag der neuen Befehlsnamen 
in die Befehlstabelle 

2. Einfügen der entsprechenden 
Routmen 

3. Eintrag der Adressen dieser Rou¬ 
tinen m die beiden Verteilerzeilen 

Die ganze Arbeit des Suchens und 
Decodierens übernimmt Strubs au¬ 
tomatisch. 

Wie neue Funktionen (beispiels¬ 
weise die Ausgabe der Makro- 
Tabelle) in das Menü aufgenommen 
werden können, haben sie bereits in 
der letzten Folge am Beispiel der 
RENUMBER-Funktion gesehen. 

Eine Zusammenstellung der oben 
besprochenen Erweiterungen fin¬ 
den Sie in Bild 5. 

Strubs und Interpreter¬ 
erweiterungen 

Wollen Sie mit Strubs Programme 
für Interpretererweiterungen bear¬ 
beiten, dann sind einige weitere 
Dinge zu beachten. Entfernen Sie 
zunächst wie in Folge 3 beschrieben 
die Interpretererweiterung von 
Strubs. 

Falls die Erweiterung, die Sie be¬ 
nutzen wollen,' nicht in den Editor 


1.8 £X-RUS0EBEN '• 

28 PRINT "X-";X 
39 RETURN 

RERBV, 

28 REM VEREINBARUNG: 

30 ! EXT: fiMRPRO: 740, £P10T '• 50000 

RERBV. 


Bild 7. Berichtigung zur Folge 2, Seite 121 

eingreift, sondern ihre neuen Befeh¬ 
le durch besondere Zeichen (mei¬ 
stens »!«) gekennzeichnet werden, 
dann ändern Sie wie bereits oben 
beschrieben die entsprechenden 
Erkennungszeichen, die Strubs be¬ 
nutzt. 

Bei Erweiterungen wie Simon’s 
Basic, die in den Editor eingreifen 
und die neuen Befehle wie der 
Basic-Interpreter durch eigene To¬ 
kens darstellen, ist es am einfach¬ 
sten, den Strubs-Befehlen, deren 
Namen solche Befehle enthalten, 
neue Namen zu geben. Im Fall von 
Simon’s Basic sind davon beispiels¬ 
weise Strubs-Befehle wie »!REPE- 
AT«, »IUNTIL« oder »!ELSE« etc. be¬ 
troffen. 

Dazu sind nur die Namen in den 
DATA-Zeilen 45272 bis 45274 zu än¬ 
dern. Sie können die betroffenen 
Strubs-Befehle aber auch wie oben 
am Beispiel von »DEFMAICRO« be¬ 
schrieben aus den Tokens zusam¬ 
mensetzen. Dabei ist aber zu be¬ 
rücksichtigen, daß die Tokens von 
Simon's Basic aus zwei Zeichen und 
nicht wie die normalen Tokens aus 
nur einem Zeichen bestehen. 

Eine Liste der von Strubs benutz¬ 
ten Variablen bietet Bild 6. Dabei 
kennzeichnet das Zeichen »*« Zei¬ 
lennummern, in denen eine Wertzu¬ 
weisung an die Variable erfolgt. 

Zum Abschluß noch einige Be¬ 
richtigungen zu den ersten Folgen: 
Die abgedruckte Programmversion 
wird nicht wie behauptet mit einem 
Kaltstart, sondern mit normalem 
»END« (Zeile 40190) beendet. Bei 
den in Teil 2 auf S. 121 angeführten 
Beispielen für Markendefinition und 
Extemdeklaration haben sich Feh¬ 
ler eingeschlichen. Die korrekte 
Form entnehmen Sie bitte Bild 7. 

(Matthias Törk) 
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Grafik-Grundlagen 


C 64-Kurs 


REISE DURCH DIE WU 


Zeichen im 

V Mehrfarbenmodus und (aber 

V nicht gleichzeitig) mit veränder¬ 
ten Hintergrundfarben darstellen. 
Das Prinzip der Bit-Map ist Ihnen 
vertraut und Sie wissen, wie man 
dem Computer sagt, daß er nun sei¬ 
ne Bildschirminformationen aus die¬ 
ser Bit-Map holt. Sie können in die¬ 
sem Modus die Farben bestimmen 
und schließlich auch Punkte exakt in 
die Bit-Map setzen. Wenn Ihnen der 
Inhalt der Bit-Map nicht mehr ge¬ 
fällt, können Sie sie löschen. 

In dieser vierten Folge werden wir 
lernen, wie man die Speicher des 
Commodore 64 für Grafikanwen¬ 
dungen umkrempelt. Wir werden 
»Dornröschen« in mehreren Farben 
erleben und schließen diesen Teil 
der hochauflösenden Grafik mit ei¬ 
ner kleinen Unterprogrammbiblio¬ 
thek ab. Der einleitenden Worte 
sind genug gesagt, Dornröschen 
wartet. 



Wir krempeln den Com- 
modoie 64 um: Speicher- 
Veränderungen für hoch¬ 
auflösende Grafik 

Wenn Sie als stolzer Besitzer eines 
C 64 früher auch mal ebenso stolzer 
Besitzer eines VC 20 waren, dann ist 
Ihnen sicherlich in wehmütiger Erin¬ 
nerung, was Sie sehen, wenn Sie 
durch die POKE-Kommandos 
POKE 51,255:POKE 52, 31:POKE 
55,255:POKE 56,31 
in der letzten Folge die Bit-Map vor 
dem Überschreiben durch Basic 
geschützt haben und dann mal mit 
PRINT FRE (1) nach dem freien 
Basic-Speicher fragten: Da zeigte 
sich: 6144 (ohne Programm)! 

Geht das Ringen um jedes Byte 
nun wieder los? Wie soll denn in die¬ 
se 6 KByte ein besseres Spiel mit 
Hochauflösungsgrafik — ganz zu 
schweigen von anspruchsvolleren 
Programmen, zum Beispiel einer 
Kurvendiskussion — hineinpassen? 
Nun, keine Sorge: Wozu haben wir 
im C 64 denn 64 KByte RAM? Wir 
müßten nur wissen, wie wir sie nut¬ 
zen können. 


Nachdem in den ersten drei Folgen unseres Grafikkurses < 
Die hochauflösende Grafik des Commodore 64, die von i 
men einzusetzen. Die nötigen Hilfsmittel, wie zum Beispiel 


Dazu sehen wir uns nochmal den 
VIC-II-Chip an. Im Gegensatz zur 
CPU (unserem Prozessor 6510), die 
über 16 Adressenleitungen verfü¬ 
gen kann, stehen beim VIC-II-Chip 
lediglich 14 zur Disposition. Wäh¬ 
rend man also mit 16 Leitungen alle 
Adressen 

von 0 bis 1111 1111 1111 1111 = 65535 
ansteuern kann, ist bei 14 Leitungen 
ein Maximum 

von 11 1111 1111 1111 = 16383 Adressen 
möglich, also 16 KByte. 

Der gesamte Speicherraum des C 
64 ist in vier solche 16 KByte-Blöcke 
aufteilbar und wie wir wissen, blickt 
der VIC-II-Chip im Normalfall auf 
den ersten 16 KByte-Block (siehe 
Bild 1). Nun kann man dem VIC-II- 
Chip mitteilen, daß er seine Auf¬ 
merksamkeit auf die anderen Spei¬ 
cherviertel richten möge. Das erfor¬ 
dert die Mitarbeit des »Portiers« CIA 
2 (siehe Folge 1). Er h*» m Gebäude 
56576 zwei Zimmer (Bits 0 und 1), aus 
denen dem VIC-II-Chip die Anwei¬ 
sungen gegeben werden, um wel¬ 


verwendet habe, wäre das eigent¬ 
lich nicht nötig gewesen, jedenfalls 
habe ich nichts bemerkt, als ich das 
nicht getan habe. 

Trotzdem gebe ich hier diese 
Empfehlung weiter, falls in Ihren 
Programmen diese Maßnahme not¬ 
wendigwird. Falls Sie vergessen ha¬ 
ben sollten (Folge 2), wie man Bits 
setzt oder löscht, hier die nötigen 
Programmzeilen dazu: 

20 POKE 56576, (PEEK(56576) AND 
252) OR I 

30 POKE 56578, PEEK(56578) OR 3 

I ist dabei der in Tabelle 1 gezeig¬ 
te Dezimalwert der Bits 0 und 1. 

Der VIC-II-Chip managt auch den 
Bildschirm. Im Einschaltzustand 
packt er den Bildschirmspeicher — 
wie wir schon wissen — 
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ches Viertel unseres Speichers er 
sich kümmern soll. Auf welche Wei¬ 
se diese Bits den VIC-II-Chip-Zugriff 
regeln, sehen Sie aus Tabelle 1. 

Commodore empfiehlt nun noch 
sicherzustellen, daß die zu dieser 
Abschnittsauswahl gehörigen Bits 
des Datenrichtungsregisters Port A 
im CIA 2 (Speicherstelle 56578) auf 1, 
also auf Ausgabe, gestellt werden. 
In allen Programmen, die ich bisher 


ZElCliE ^SPl E . 

k°W 409Rn ^ÜEn-S 

R °v BETPjtl 535 tnS?*** 

re9eln 

es WCtoT 

PS auf ton Sp eich ' 

in den Bereich 1024 er 

und 2023. Wenn wir nun 
einen anderen 16 KByte-Abschnitt 
wählen, legt er den Bildschirm an 
die entsprechende Stelle dieses 
Abschnittes, also: 

In Abschnitt 0: Bildschirm von 1024 
bis 2023 

in Abschnitt 1: Bildschirm von 16384 


162 
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DERWELTDER GRAFIK 


Grundlagen geschaffen wurden, nähern wir uns endlich mit Riesenschritten unserem Ziel: 
endlich aus ihrem Dornröschenschlaf geweckt wurde, gezielt in unseren Basic-Program- 
e kleine Bibliothek von Grafik-Unterprogrammen, werden in dieser Folge vorgestellt. 


+ 1024 = 17408 

bis 16384 + 2023 = 18407 

in Abschnitt 2: Bildschirm von 32768 

+ 1024 = 33792 

bis 32768 + 2023 = 34791 

in Abschnitt 3: Bildschirm von 49152 

+ 1024 = 50176 

bis 49152 + 2023 = 51175. 

Damit brauchen wir uns aber 
nicht zufrieden geben. 

Multivisio - unter 64 
Bildschirm wählen 

Im 16 KByte-Speicherabschnitt hat 
der Bildschirmspeicher ja 16mal 
Platz und wir können ihn ohne weite¬ 
res an eine andere Stelle schieben. 
Damit kehren wir nochmal zur schon 
oft besungenen Speicherstelle 
53272 zurück. Die Bits 4 bis 7 geben 


dem VIC-II-Chip den Ort des Bild¬ 
schirmspeichers an. Durch Verän¬ 
dern dieser 4 Bits können wir tat¬ 
sächlich die 16 Bildschirme pro 16 
KByte-Abschnitt einrichten. Der Zu¬ 
sammenhang zwischen den Bits 4 
bis 7 von Adresse 53272 und dem 
Ort des Bildschirmspeichers im Ab¬ 
schnitt 0 (und entsprechend paral¬ 
lelverschoben in den anderen Ab¬ 
schnitten) ist in Tabelle 2 gezeigt. 


Um die entsprechende Bitanord¬ 
nung zu erreichen, müssen wir also 
eingeben: 

40 POKE 53272, (PEEK(53272) AND 
15) OR W 

Dabei ist W der Dezimalwert der 
Bits 4 bis 7 aus Tabelle 2. 

Das Betriebssystem muß auch 
noch erfahren, daß der Bildschirm¬ 
speicher verlegt worden ist. Man 
kann es ihm mitteilen, indem man 
die Pagenummer der Bildschirm¬ 
startadresse in Speicherstelle 648 
einPOKEd. Also ist zum Beispiel der 
normale Inhalt von Speicher 648: 
1024/256 = 4. Auf Page 4 beginnt 
der Bildschirm ja im Einschaltzu¬ 
stand. Die Pagenummer ergibt sich 
aus I und W (siehe Tabelle 1 und 2) 
durch folgende Rechnung: 

50 P = (W/16*1024 + 16384*(3T))/256 
und wird dann eingePOKEd: 


55 POKE 648,P 
So! Jetzt können wir theoretisch 64 
Bildschirme erzeugen. Um uns das 
in der Praxis mal anzusehen, ergän¬ 
zen wir die bisher verwendeten Pro¬ 
grammzeilen (die Sie hoffentlich 
noch nicht mit RUN gestartet haben, 
das wäre nämlich mit etwas Glück 
eine gute Methode, den Rechner 
abstürzen zu lassen!) noch um fol¬ 
gendes: 


10INPUT"I,W”;I,W:PRINTCHR$(147) 
60 PRINT CHR$(147)I,W:END 
65 PRINT CHR$(147) 

70 POKE 56576,151:POKE 56578,63: 
POKE 53272,21:POKE 648,4 
80 I = 3:W= 16:PR1NT CHR$(147)I,W 
90 END 

Bevor Sie das starten, sollten Sie 
bitten daran denken, daß einige I,W- 
Kombmationen den Computer zum 
totalen Black-Out führen: Zum Bei¬ 
spiel 1=3,W= 0 legt den Bildschirm¬ 
start direkt in die Zeropage, ist also 
nicht empfehlenswert. I = 3,W= 32 
zerstört unser Programm, das genau 
bei 2048 anfängt. Am besten spei¬ 
chern Sie das Programm vor dem 
Starten ab. 

Jeweils nach RUN und Eingabe 
der Werte I und W, zum Beispiel 
I = 3, W=48, wird der Bildschirm ge¬ 
löscht und in der obersten. Zeile 
wird der I- und der W-Wert angege¬ 
ben. Danach meldet sich READY 
und ein Cursor. Jetzt befinden wir 
uns im neuen Bildschirm (unser Bei¬ 
spiel also 3072 bis 4071) und können 
damit herumexperimentieren. 


Bildschirm-Experimente 

Wenn wir jetzt (falls keine 
Programmänderung in der Zwi¬ 
schenzeit durchgeführt wurde) 
CONT eingeben, wird der Ur¬ 
sprungszustand (Bildschirm bei 
1024) wieder hergestellt und dies 
durch die Angabe der I- und W- 
Werte 3 und 16 angezeigt. 

Wenn Sie mit diesem Programm in 
den Bereich 4096 bis 8191 vorstoßen, 
werden Sie feststellen, daß hier kein 
normaler Bildschirm möglich ist. 
Hier stören die mehrfach schon be¬ 
schworenen Geisterbilder des 
Zeichen-ROM, die in diesem Be¬ 
reich liegen. Es kann sogar passie¬ 
ren, daß der Rechner nach der Ein¬ 
gabe von CONT nur noch SYNTAX 
ERRORs meldet und nicht mehr in 
den Normalzustand zurückzuführen 
ist. Ab 8192 bis 15360 (jeweils Start 
des Bildschirmes) kann man wieder 
ohne Störung Bildschirme einrich¬ 
ten. Wenn Sie jetzt mal I = 2 und ver¬ 
schiedene W-Werte versuchen, se¬ 
hen Sie nur Nonsens oder gar nichts 
auf dem Bildschirm, dasselbe ge¬ 
schieht bei 1 = 0. 




SPEICHERSTELLE 

DEZIMALWERT 



53272 

(BITS 0-3 als 0 an- 

BILDSCHIRMSTARTADRESSE 


genommen) 


(IM ABSCHNITT 0) 

BITS: 7654 

W 

DEZIMAL 

HEX 

0000 

0 

0 

0 

0001 

16 

1024 

400 

0010 

32 

2048 

800 

0011 

48 

3072 

COO 

0100 

64 

4096 

1000 

0101 

80 

5120 

1400 

0110 

96 

6144 

1800 

0111 

112 

7168 

1COO 

1000 

128 

8192 

2000 

1001 

144 

9216 

2400 

1010 

160 

10240 

2800 

1011 

176 

11264 

2 COO 

1100 

192 

12288 

3000 

1101 

208 

13312 

3400 

1110 

224 

14336 

3800 

1111 

240 

15360 

3 COO 


Tabelle 2. Zusammenhang zwischen den Bits 4 bis 7 von Speicher 53272 und dem Ort 
des Bildschirms in Abschnitt 0 
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Das ist wieder eine Besonderheit 
des VIC-II-Chip. Er ist so struktu¬ 
riert, daß der (im Normalfall) in die¬ 
sen beiden Abschnitten keinen Zu¬ 
gang zu den normalen Zeichenspei¬ 
chern hat. Dafür gibt es in Abschnitt 
1 (1 = 2) keine Störung durch die 
Zeichen-Geisterbilder, ebenso in 
Abschnitt 3 (I=0). In Abschnitt 2 (I = 1) 
begegnen wir zwischen 36864 und 
40959 wieder den hier ein zweites 
Mal vorhandenen Zeichen- 
Gespenstern. Unterhalb von 36864 
läßt sich der neue Bildschirm gut 
verwenden. 


Der verborgene Speicher 
— RAM-Bereiche 
unter dem ROM 

Ein Problem stellt sich hier und 
auch im obersten Abschnitt aber 
noch auf andere Weise: Wenn wir 
den Bildschirm zum Beispiel mit 1 = 1 
und W=128 nach 40960 legen (tun 
Sie es bitte nicht!), dann erhalten wir 
bei jeder Eingabe nur noch »SYN¬ 
TAX ERRORs« und können den 
Computer nur durch Aus- und Ein¬ 
schalten wieder zu normaler Tätig¬ 
keit bewegen. Was ist da los? Die Er¬ 
klärung ist, daß von 40960 bis 49151 
das Basic-ROM und von 57344 bis 
65535 das Betriebssystem dem RAM 
überlagert sind. Wenn man in diese 
Regionen hineinPOKEd, landet die 
Information natürlich im darunterlie¬ 
genden RAM. Das was auf dem Bild¬ 
schirm erscheint wenn wir aus dem 
Programm-Modus aussteigen, ist al¬ 
lerdings — leider — der Inhalt des 
darüberliegenden ROM. Ersetzen 
Sie aber mal das »END« in Zeile 60 
durch die folgenden Zeilen; 

60 PRINT CHR$(147)I,W:PRINT” 
BILDSCHIRM LIEGT UNTER DEM 
ROM« 

65 GET A$:IF A$ = ” "THEN 65 
Siehe da! Es funktioniert also im 
Programm-Modus (zum Beispiel mit 
1 = 1 und W= 128). Wir können daher 
unter das Basic-ROM auf diese Wei¬ 
se acht Bildschirme legen. Unter 
das Betriebssystem lassen sich so 
auch Bildschirme legen, nur können 
wir hier den Text nicht lesen, weil 
der VIC-II-Chip — wie gesagt — hier 
keinen Zugriff zum Zeichen-ROM 
hat. So legt zum Beispiel 1 = 0 und 
W=240 den Bildschirm nach 64512, 
was leicht nachprüfbar ist durch die 
Zeile: 

62 POKE 65000, l:POKE 55784,1. 

Damit wenden wir uns nun dem 
kritischen Bereich zwischen 53248 
und 57343 zu. Hier liegen ja das 
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Zeichen-ROM und die Ein- und Aus¬ 
gabebausteine. Normalerweise — 
wie man auch durch unsere POKE in 
diesen Bereich erkennen kann — 
sind hier die Ein- und Ausgabe- 
Bausteine eingeschaltet. Wenn wir 
hierher Bildschirme legen, kann al¬ 
les mögliche passieren, weil wir Re¬ 
gister des VIC-II-Chip, des SID und 
CI As beeinflussen. Hier sollte man 
mit viel Vorsicht und gegebenen¬ 
falls nur in Maschinensprache ope¬ 
rieren. 

Was wir durch die Programmzeile 
62 noch erkennen können: Das 
Bildschirmfarben-RAM verschiebt 
sich nicht, egal, welches Speicher¬ 
viertel wir wählen und wohin wir 
den Bildschirm auch legen: Das 
Farb-RAM liegt immer von 55296 bis 
56295. 


Wohin mit der Bit-Map? 


Nun aber zum großen Speicher¬ 
fresser: Zur Bit-Map. Mit ihren 8000 
Byte paßt sie im Prinzip achtmal in 
unseren Computer. Im ersten Vier¬ 
tel (0 bis 16383) haben wir sie schon 
gehabt und das als unbefriedigend 
empfunden. Nun wollen wir uns an¬ 
dere Möglichkeiten ansehen und 
dabei noch bedenken, daß wir auf 
den normalen Zeichensatz verzich¬ 
ten können (wir stellen ja hochauflö¬ 
sende Grafik dar!). Zu diesem 
Zweck werden wir das bisher ver¬ 
wendete Bildschirmtestprogramm 
um einen Hochauflösungsteil erwei¬ 
tern (Listing 1). Um die leidige Eintip¬ 
perei minimal zu halten, wurde auf 
Schönheit und erläuternde REM- 
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Zeilen verzichtet. Der Hochauflö¬ 
sungsteil stimmt weitgehend mit 
dem Programm aus der letzten Fol¬ 
ge überein. Geben Sie also jetzt das 
Listrng 1 ein, speichern Sie es mög¬ 
lichst gleich ab und probieren Sie es 
aus. 

In Bild 2 sind alle möglichen Posi¬ 
tionen der Bit-Map und des Bild¬ 
schirmes angegeben. 

Wie man sehen kann, scheiden 
die Kombinationen Nummer 1 und 
Nummer 7 von vornherein aus, weil 
wir mit dem Löschen der Bit-Map 
auch das Lebenslicht unseres Rech¬ 
ners ausblasen. Die Kombination 
Nummer 2 kennen wir schon; So ha¬ 
ben wir in der letzten Folge hochauf¬ 
lösende Grafik betrieben und wa¬ 
ren enttäuscht über den geringen 
verbliebenen Basic-Speicher. Bei 


Nummer 5 funken uns die Zeichen- 
Spiegelbüder in die Bit-Map, diese 
Kombination scheidet also auch aus. 
Nett sieht es aus, wenn wir die Kom¬ 
binationen Nummer 6 und Nummer 
8 testen. Hier machen sich die ROM- 
Inhalte grafisch zwar ganz interes¬ 
sant aus, aber mit dem Sinn unserer 
hochauflösenden Grafik hat das 
nichts mehr zu tun. Für uns brauch¬ 
bar sind die Positionen im Abschnitt 
1; Kombinationen Nummer 3 und 
Nummer 4. Em Maximum an Basic- 
Speicher findet man bei der letzten 
gezeigten Kombination Nummer 9, 
wo ab 23552 der Büdschirm und ab 
24576 die Bit-Map liegen. Wenn Sie 
den Basic-Speicher für diese An¬ 
ordnung schützen, mit POKE 
55,0:POKE 56,92:POKE 52,92 und 
den Computer dann mit PRINT 


FRE(I) nach dem freien Speicher¬ 
platz fragen, dann erhalten Sie als 
Antwort immerhin satte 21501 freie 
Byte. 

Der Idealfall wäre es, wenn man 
die Bit-Map unter das ROM legen 
könnte (Kombinationen 6 oder 8). 
Das geht natürlich auch! Von Basic 
aus wird ein Programm dann aller¬ 
dings noch langsamer, weü man für 
jeden Punkt ähnliche Operationen 
vornehmen müßte, wie wir sie in der 
zweiten Folge beim Kopieren des 
Zeichen-ROM ins RAM verwendet 
haben. Auch so ist die ganze Hoch¬ 
aullösungsgrafik schon ziemlich 
langsam. Wir werden aber in kom¬ 
menden Folgen einige Routinen in 
Maschinensprache kennenlemen, 
die uns mehr Möglichkeiten eröff¬ 
nen. 





ZEICHEN 

ROM 


der-v 

BASIC-ROM 


I/O 

KERNAL-ROM 

riTT i 


—^ 

ÄBSCE 

NITT 2 


ABSCI 

NITT 3 





r onur 




32 36 40 

8000 9000 A000 

32768 36864 40960 


48 

COOO 

49152 


52 

D000 

53248 


RAM 


56 

E000 

57344 


64 

FFFF 

65535 





























'ß BilLÖSCjHllRIvfE ! 









BIT-MAP 









BIT- 

MAP 

ä PftOiGRtBlJjD^Cfl. 











4 bJlpsqh. 

BIT-MAP 










BIT-MAP 

8 ptfOORlBltDfcfr 











4 e[ii4sCh. 

BIT-MAP 










BIT-MAP 

24576 


nd Bit-Map 


Ausgabe 7/Juli 1984 


i65 


























































Grafik-Grundlagen 


C 64-Kurs 


Hochauflösende Grafik in Farbe: 
Kann das der C 64 überhaupt? Die 
Antwort lautet Ja und Nein. Ja, weil 
der bislang von uns verwendete Bit- 
Map-Modus anstelle der zwei bis¬ 
her benutzten auch mit vier Farben 
ablaufen kann. Nein, weil die Punk¬ 
teauflösung dann eigentlich nicht 
mehr die Bezeichnung »hochauflö¬ 
send« verdient. Die horizontale Auf¬ 
lösung geschieht hier nämlich nur 
noch in 160 Positionen anstelle der 

Die Grafik bekennt Farbe: 
Der Bit-Map-Mehrfarben- 
Modus 

bisher ansprechbaren 320. Meme 
persönliche Meinung dazu ist, ernst¬ 
hafte hochauflösende Grafik sollte 
sich im bisher besprochenen Bit- 
Map-Modus abspielen, denn ein 
Bildschirm mit 64000 Bildpunkten ist 
schon eine Minimalanfordemng. 
32000 Bildschirmpositionen sind al¬ 
lenfalls für Spielereien ganz nett, 
wenn auch etwas teuer, denn ohne 
Farbmonitor haben Sie von der Far¬ 
be nicht viel und über den Unter¬ 
schied zwischen Farbfernseher und 
Farbmonitor haben wir im Verlauf 
dieser Serie schon etwas erfahren. 

Nach dieser etwas desillusionie- 
renden Vorrede widmen wir uns al¬ 
so der mehrfarbigen Bit-Map- 
Grafik. Es handelt sich um eine Kom¬ 
bination aus der bisher bekannten 
Bit-Map-Grafik und dem Mehrfar- 
ben-Modus, den wir schon bei den 
mehrfarbigen Zeichen kennenge- 
lemt haben. Auf dem Bildschirm 
wird der Inhalt der Bit-Map wieder¬ 
gegeben, aber die Farben der 
Zeichnungen sind abhängig von Bit- 
Paaren. Welche Farben Sie bei wel¬ 
cher Paarung sehen, darüber gibt 
Tabelle 3 Aufschluß. 

Es existiert also eine Hintergrund¬ 
farbe für den gesamten Bildschirm, 
die überall dort auftaucht, wo in der 
Bit-Map ein Bit-Paar 00 vorhanden 
ist. Diese Hmtergrundfarbe ist 
durch den Zahlenwert in Register 
53281 bestimmt. Die anderen drei 
Farben treten jeweüs in den 8 x 8-Bit- 
Bildschirmfeldern auf, in die das 
Video-RAM, beziehungsweise der 
Büdschirmfarbspeicher aufgeteilt 
sind. 

Wir ergänzen unser Programm 1 
für den Mehrfarben-Modus: Außer 
dem Bit-Map-Modus muß hier also 
noch der Mehrfarb-Modus einge¬ 
schaltet werden. Das haben wir m 
der letzten Folge kennengelernt: 
145 POKE 53270,PEEK(53270) OR 16 
Weiterhin ändern wir noch die Zeile 
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Bild 3. 
Ein Punkt (X,Y) 
im Bildschirmkoordinatensystem 
(0<X <319,0 <Y<199) 


5 und schreiben anstelle von F = 6 
jetzt GOSUB 300. Folgende Zeilen 
kommen neu hinzu: 

300 PRINT CHR$(1 £.7)CHR$(17)" 
FARBENWAHL:' 1 310 PkINT CHR$ 
(17)"HINTER-GRUNDFARBE”TAB 
(30);:INPUT FO 320 PRINT "BITS 4-7 
VIDEOMATRIX”TAB(30);:INPUT Fl 
330 PRINT "BITS 0-3 VIDEOMA- 
TRIX"TAB(30);:INPUT F2 
340 PRINT "BILDSCHIRMFARB- 
SPEICHER"TAB(30);:INPUT F3 
350 POKE 53281,F0:F = 16*F1 + F2: 
FOR 1 = 55296 TO 56295:POKE I,F: 
NEXTI 

360 PRINT CHR$(147):RETURN 
Um des Effektes willen ändern wir 
noch die Zeüe 220, in der die Video¬ 
matrix mit den Farbzahlen belegt 
wird: 

220 FOR J = 0TO 998 STEP 2:POKE 
J,F:NEXT J:FOR J = lTO 999 STEP 
2:POKE J,F + 1:NEXT J 
Starten Sie dieses Programm nach 
dem Abspeichem mit RUN, probie¬ 
ren Sie alle möglichen Farbkenn- 
zahlen aus. Sie werden fast immer 
bemerken, daß die Hoch- und Tief¬ 
punkte der Kurve nicht mitgezeich¬ 
net werden. Das liegt daran, daß un¬ 
ter Verfahren der Berechnung, wel¬ 
ches Bit in welchem Byte gesetzt 
werden soll, noch auf einzelne Bits 
und nicht die paarweise Verwen¬ 
dung abgestimmt ist, Es gibt zwei 
Möglichkeiten: Entweder ändert 
man das Berechnungsverfahren in 
Zeile 240, um an die richtige Stelle 
die passenden Bit-Paare zu bekom- 
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men, oder wir ändern die Pro¬ 
grammzeile 230 zu: 

230 FOR 1 = 0 TO 319 STEP 2:Y= 
FNA(X) 

Das ist zwar mal wieder etwas pri¬ 
mitiv, aber — wie gesagt — sind mei¬ 
ne Ambitionen zur Mehrfarben- 
»Hochauflösung« sowieso nicht so 
stark. Wer Lust hat, kann sich ja ger¬ 
ne mal mit der korrekten Weise der 
neuen Berechnung herumschlagen. 
Das Wissen, diese Aufgabe zu be¬ 
wältigen, haben Sie jetzt. Auf dem 
Schwarzweiß-Monitor sieht zum Bei¬ 
spiel folgende Zahlenkombination 
ganz gut aus: 

Hintergrundfarbe: 7 
Bits 4 bis 7: 5 
Bits 0 bis 3: 1 
Bildschirmspeicher: 0 
Außerdem natürlich noch: 1 = 2, 
W=112, B = l. 

Mit dem hier folgenden Abschnitt 
soll zunächst einmal die hochauflö¬ 
sende Grafik beiseite gelegt wer¬ 
den. Dornröschen ist erwacht und 
genesen, allerdings noch nicht voll 
bei Kräften. Das wird in einer späte¬ 
ren Folge noch anders werden. Da¬ 
vor wollen wir aber noch weitere 
Grafik-Besonderheiten des C 64 be¬ 
handeln. An dieser Stelle wollen wir 
jedoch einen Zwischenhalt einlegen 
und eine kleine Sammlung von 
Basic-UnterProgrammen zur Grafik- 
Programmierung vorstellen. In Li¬ 
sting 2 sind diese Grafik-Unterpro¬ 
gramme, in Listing 3 ein Beispiel- 
Aufrufprogramm abgedruckt. Beim 
Emtippen beider Programme kön¬ 
nen Sie die REM-Zeilen ohne Scha¬ 
den weglassen. 

Erläuterungen zu Listing 2 (Zeilen¬ 
bereich 49990 bis 51500) 

▼ Sprungtabelle: 

Das ist in Basic im allgemeinen 
nicht üblich, sondern wird häufiger 
bei Maschinensprache-Program¬ 




men verwendet. Trotzdem hat es 
auch hier seine Vorteile. Es kann ja 
sein, daß Sie einige Änderungen 
oder Ergänzungen in den Unterpro¬ 
grammen vornehmen wollen. Sie 
müßten dann auch immer die 
Adressen in den jeweils aufzurufen¬ 
den Hauptprogrammen umschrei¬ 
ben. Mit der Sprungtabelle ist das 
nicht mehr nötig, denn die GOSUB- 
Adressen im Hauptprogramm blei¬ 
ben unverändert, nur die neuen 
GOTO-Adressen im Unterpro¬ 
gramm sind einzusetzen. 

* HIRES an 

Hier machen wir uns die Erkennt¬ 
nisse dieser Folge zunutze und le¬ 
gen den Bildschirm nach 23552 und 
die Bit-Map nach 24576. Beides müs¬ 
sen wir — wie gehabt — vor dem 
Überschreiben durch Basic schüt¬ 
zen mit: 

POKE 52,92:POKE 56,92. 

Am besten packt man diese 
POKE-Befehle gleich in die ersten 
Zeilen des aufrufenden Hauptpro¬ 
gramms. 

▼ Bit-Map-Löschen 

Hierzu gibt es nichts mehr zu sa¬ 
gen, außer, daß I als Laufvariable 
dient. 

▼Farbgebung 

Bevor dieses Unterprogramm auf¬ 
gerufen wird, müssen im Hauptpro¬ 
gramm 

Fl = Zeichenfarbe und 
F2 = Hintergrundfarbe 
definiert sein. An Variablen treten 
noch auf: 

F = Farbcodezahle auf Fl und F2 
I = Laufvariable 

^ HIRES aus 

Dieses Programm stellt die ur¬ 
sprüngliche Speicherorganisation 
wieder her (Bildschirm- und Zei¬ 
chenspeicher) und schaltet in den 
Normalmodus zurück. 

▼ Punkt setzen 

Auch hier müssen vor dem Aufruf 
des Unterprogramms im Hauptspei¬ 
cher die 

Punktkoordinaten X,Y 

definiert sein (siehe Bild 3) sowie die 

L — Löschmarke 

Wenn L = 0 ist, wird der Punkt ge¬ 
setzt (Zeile 50930), so, wie wir das 
schon kennen. Ist L = 1, dann wird 
ein vorhandener Punkt gelöscht 
(Zeile 50920). 

Die Zeile 50905 achtet darauf, daß 
keine Punktkoordinate außerhalb 
des Bildschirms liegt, was unter Um¬ 
ständen ein Aussteigen mit Fehler¬ 
meldung im Hochauflösungsverfah¬ 
ren zur Folge hätte. Das ist hier zwar 
nicht so tragisch, weil man durch 
Eingeben von GOTO 50030 »RE¬ 
TURN« schnell wieder in den Nor¬ 


malmodus gelangen kann (eventuell 
muß vorher noch »SHIFT« + »CLR/ 
HOME« gedrückt werden). Trotz¬ 
dem ist es dumm, wenn inmitten all 
dieser zeitraubenden Grafiktätig¬ 
keiten auch noch der Rechner aus¬ 
steigt, Eine Grenzüberschreitung 
der Koordinaten ist um so leichter 
möglich, als die Punkt-Routine von 
allen folgenden Unterprogrammen 
aufgerufen wird. Außer X,Y und L 
tauchen noch die Variablen BY und 
BI auf, die wir schon-kennengelernt 
haben als das Byte, in dem ein Bit zu 
setzen oder zu löschen ist. 

▼ Punkt löschen 

Hier geschieht nichts anderes, als 
die Löschmarke L auf 1 zu setzen 
und dann in die Punkt-Setz-Routme 
zu springen. Deswegen gilt für die¬ 
ses Unterprogramm dasselbe wie 
für das vorangegangene. 

▼ Strecke zeichnen 

Vor dem Aufruf müssen dem 
Rechner schon 
der Startpunkt (X1,Y1) und 
der Endpunkt (X2,Y2) der Strecke 
bekannt gemacht sein (siehe Bild 4). 

Den mathematisch Versierten 
wird es bei der Betrachtung der Zei¬ 
len 51120 beziehungsweise 51160 
schon aufgefallen sein, daß zur Be¬ 
rechnung der Punkte, aus denen 
sich die Strecke zusammensetzt, die 
sogenannte 2-Punkte-Form der Ge¬ 
radengleichung verwendet wurde: 

YY1 = Y2-Y1 

X-Xl X2-X1 

Den mit Mathematik nicht so ver¬ 
trauten Lesern sei gesagt, daß es 
sich um eine Formel aus der soge¬ 
nannten analytischen Geometrie 
handelt. Das ist ein Gebiet der Ma¬ 
thematik, das für die Grafik auf 
Computern eine nicht unerhebliche 
Rolle spielt. 

Die Punkte (XI, Yl) und (X2, Y2) 
dürfen auch außerhalb des Bild¬ 
schirmsystems liegen. Im ersten Teil 
des Unterprogramms dient die 
Übergabevariable X auch gleich¬ 
zeitig als Laufvariable während Y 
berechnet wird. Wenn allerdings 
der Absolutbetrag von X2-X1 klei¬ 
ner als 5 wird, verkehren sich die 
Verhältnisse: Y wird Laufvariable 
und X berechnet. Das beschleunigt 
das Zeichnen von Senkrechten und 
verhindert außerdem eine Division 
durch Null. Der Wert von 5 ist dabei 
ziemlich willkürlich gewählt. L ist 
wieder die Löschmarke. 

▼ Strecke löschen 

Es gilt dasselbe wie für das Unter¬ 
programm Strecke zeichnen, nur 
daß hier wieder die Löschmarke 
gesetzt wird. 
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Grafik-Grundlagen 


^Ellipse zeichnen 

Vor dem Aufruf müssen folgende 
Werte schon definiert sein (siehe 
auch Bild 5): 

(XM.YM) = Mittelpunktkoordi- 
naten 

HX = Halbmesser in X- 

Richtung 

HY = Halbmesser in Y- 

Richtung 

WUWO = Der zu zeichnende 
Ellipsenbogen beginnt 
beim Winkel WU und 
endet beim Winkel 
WO (Gradmaß) 

Eine volle Ellipse wird also ge¬ 
zeichnet, wenn WU = 0 und WO = 


49990 REM 

49991 REM 

49992 REM 

49993 REM 

49996 REM 

49997 REM 

49998 REM .— 

49999 REM 

59000 G 0 T o50500 
59010 G O T050600 
5 0 ü 2 @ G O T030780 
50830 G0703@ 8 0 0 
50040 GOTO50900 
59050 G 0 T 0 519 0 0 
50060 G0TO51100 
50078 GOTO51200 
50080 GOTO51380 
5999@ G O T O 314 0 0 
59100 001051500 

50499 REM 

39491 REM -.. 

50492 REM 

50493 REM .. 

50494 REM 

50500 P0KE5£ 


UNTERPROGRAMME 


SPRUNGTRBELLE- 


1 REM mmmmmmmmmmmm* 

2 REM * PROGRAMM 1 * 

3 REM ***5H*3(i*äHit!**i»!*!t!*it!***!*E(«**!t!* 

5 F=6:DEFFMfl < X > =50#81N < X/30 >+108 

18 FR INT CH R$ < 147 > CHRf <17) "EINGABE DER WERTE"CHR$ <17 > 

20 PRINTCHRS<17)"ICSIEHE TAB.1) ABSCHHITT-KENN21FEER"CHRt<17) 

39 PR INT "WCSIEHE TAB. 2) B.ILBSCHIRH-KENNZIFFER" Cl-IPTC1?) 

40 PRIMT"B=0,BIT-MAP IM UNTEREN ABSCHHITT-BEREICH" 

50 PRINT" BIT-MAP IM OBEREN ABSCHHITT-BEREICH"CHR$C17> 

60 PRINTCHR»<17) ■ INPUT"I, \A, B=" 1 LW,B • Al=3-I ■ A2=W/16*1024+A1 #16384•'fl3=fll #16384+B* 
8192 

70- P=P2/256 PRJ.NTCHRtC17>CHR*C17)"MIT DIESEN EIHORBEN HABEN SIE" 

80 PRINT"DEN ABSCHNITT "Al" GEWflEHLT. " 

90 PRINT"IHR BILDSCHIRM STARTET BEI "A2 

100 PRINT"UND IHRE BIT-MAP BEI "A3 

110 F'RINTCHR$C i7)" IST DAS SO IN ORDNUNG? CJ/NV 

128 GETAS ; IFA$=""TUEN12@ 

136 IFA$=”H"THEH10 
148 PRI.NTCHR*C 147) 

145 REM *#$* NEUER SPEICHER #### 

158 P0KE5S576, CF'EEK C56576)AND252 > ORI 
168 P0KE56578,PEEKC56578>0R3 
178 PDKE53272,CPEEK C53272)AND15)QRM 
188 P0KE648.P 

138 P0KE53265,PEEK <33265 >0R32 
208 P0KE53272,PEEKC53272>ORC8#B) 

218 FQRJ=@T07993 : P0KER3+J .• 0 : NEXTJ 
220 FOR J=0TO999 : P0KEA2+J, F: NEKT.J 
230 FQRX=0TQ319:V=FNACX) 

248 BV=CKAND504)+40#CVAND248>+<VAND7>:BI=7-CXAND7) 

258 P0KEA3+BV,PEEK CA3+BV)ORC2 tBI>:NEXTX 
260 OETA$ • I. FA$=" " THEN268 
265 REM mm ALTER SPEICHER #### 

278 P0KE53272,21:PQKE53265,27'P0KE648,4:P0KE56578,63:P0KE56576,151 
238 PP. INTCHR# <147 > : END 

READV. 


Listing 1. 

Testprogramin zur Bildschirmlokalisierung 




REM HIRES RH 
REM EIT-MflP-LÖESCHEN 
REM FARBGEBUNG 
REM HIRES flUS 
REM PUNKT SETZEN 
REM PUNKT LOESCHEN 
REM STRECKE ZEICHNEN 
REM STRECKE LOESCHEN 
REM ELLIPSE ZEICHNEN 
REM ELLIPSE LOESCHEN 
REM KOMBINIERTES HIRES W 
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(PEEK<56576 >ANH252>0R2 
50510 P0KE56578,PEEK<56578)0R3 
50520 P0KE53272,120:P0KES48,92 
50530 P0KE532S5,PEEK <53265)0R32 
50540 RETURN 

50590 REM 

50591 REM --•--- 

50592 REM ~BIT-MflP-LOESCHEN— 

50594 REM 

50609 FORI«2457ST032575=POKEI,0 : MENTI 
50618 RETURN 

50690 REM 

50691 REM .----- 

50692 REM —.-FARBGEBUNG- 

50634 REM 
50700 F=16*F1+F2 

50710 FORI-23552TG24551•POKEI,F:NEXTI 
50720 RETURN 
50730 REM 

50792 REM .—HIRES AUS- 

50794 REM 

50800- POKE53265,27:P0KE53272,21■P0KE648,4 
50810 P0KE56578,63 : P0KE56576,151. 

50S20 RETURN 
50890 REM 

50832 REM ..-PUNKT SETZEN.- 

50894 REM 
50900 L-0 

50905 IFR-C0ORN>319QRYC0ORY} 199THEN5Ö940 
58310 B't- < KRNB504 >+48* C VFINJJ243 ) + C V Fl NB 7 > : B1: 

58928 I FL* 1TMEHPO!<E24576+BV, PEEK < 24576-1BV > ANDNOT < 2TBI > • GOTÜ50340 
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Listing 2. 
Unterprogramme zur 
hochauflösenden Grafik 
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Grafik-Grundlagen 


1 REH ******************************* 

2 REM * GRAFIK TEST PROGRAMM VON * 

3 REM * H.PONNATH 1334 VERBROCHEN * 

4 rem ******************************* 

5 P0KE52.■ 92 = P0KE56,92: DEFFNfl<X'>=50*SIN<X/30>+100 
7 REM 

3 REM * MEHUE-GÜTEH APPETIT * 

9 REM äf**#*******#Hs#****##*fä^f**äf:*i| 6 *äj! 

10 PRIHTCHR*<147 >CHR$<17 >"UNTERPROGRAMME GRAF11< TEST"CHR*C17) 

20 PRINTTflB<2>"NUR HIRES AH"TAB<25)"1" 

30 PRINTTflB<2)"NUR PURES RUS"TflB<25)"2" 

40 PRIHTTAB<2)"BIT MAP LÜESCHEH"TAB<25>"3" 

50 PRINTTflB<2)"FARBGEBUNG"TflB<25)"4" 

60 PRINTTflB(2>"KOMBINAT J ON"TAB <25)"5" 

62 PRINTTABC2)"PUNKTE SETZEN"TflB<25>"6" 

64 PRINTTABC2)"PUNKTE LOESCHEN"TflB < 25)"7" 

66 PRINTTflB(2)"STRECKE ZEICHNEH"TABC25>"8" 

68 PRINTTflB<2>"STRECKE LOESCHEN"TAB<25)" 9 " 

78 PRINTTflB<2> "ELLIPSE ZEICHNEH"TAB<25) "Fl" 

72 PRINTTflB<2)"ELLIPSE LOESCHEN“TflB(25)"B" 

74 PR I NTTflB < 2)" DEMONSTRRT I ON "TflB ( 25 > " C " 

76 PRI NTTflB < 1 >" MENUE "TflB < 25 > "M" 

78 PRINTTflB< 1> "flÜSSTEI GEN" TflB<25) 

80 GETfl$ : IFA$=""THEH80 
90 I FR$= " <r“ THENENB 
92 IFfl*="fl"THENfl$= l, 10" 

94 IFfl$="B"THENR*="ll" 

96 IFflf="C“THENfl$="12" 

98 IFfl*®"M"THEN10 

100 OH VAL < fl$ > GOSUB50000, 50038,50010,200,300,400.508,688. 700 . 000 , 000 , j fififl 
110 GOTO80 

198 REM *************************** 

191 REM * FARBGEBUNG * 

1 32 rem 


200 1NPUT"2cICHENFftRBE.. MINTERGRUNDFflRBE= 11 , Fl, F2 • GOTOS0020 

298 rem 

£31 REM # FARBE FUER KOMBINATION * 

292 rem 

300 INPUT"ZEICHENFBRBE, H111TERGRUHDFRRBE="Fl, F2: GOTO50100 

390 rem *************************** 

391 REM * BEISPIEL PUNKTE SETZEN * 

392 REM *************************** 

406 GOSUBS0000=FQRX-0TQ31 9■ Y=FNfl< X)•GOSUB58040 : NEXTX 
410 RETURN 

490 REM r************************** 

491 REM * BEISPIEL PUNKTE LOESCHEN* 

492 rem 

500 GOSUB50000•FORX=20TO250•Y=FNRCX> : GOSUB50050 : NEXTX 
510 RETURN 

590 REM *************************** 

591 REM * flUFRUFPROGRAMM FUER * 

592 REM * STRECKE ZEICHNEN * f=4CI=t nni inte»/ 

593 REM *************************** 

609 PRINT"2ETRECKES VON <X1,V1> EIS 042, Y2>" ■ INPUT"XI .• VI, X2, V2=" ;Xl / VI, X2,V2 
618 GOSUB50000:GOT050060 
630 REM *************************** 

691 REM * AUFRUFPROGRAMM FUER * 

692 REM * STRECKE LOESCHEN * 

693 REM *************************** 

780 PRINT"SBTRECKE* VON <X1,V1) BIS <X2»Y2)":lNPUT"XI,VI,X2,V2="1X1,V1,X2,V2 
’10 GQSUB50000 : GOTO50070 
796 REM ************************** 

791 REM * flUFRUFPROGRAMM FUER * 

792 REM * ELLIPSE ZEICHNEN * 

733 REM *************************** 

800 PRINT"SELLIPSEH MIT MITTELPUNKT 0<M,VM>,":PRINTTAB<1>"HALBMESSERN HX UND HV" 
810 PR'INTTflB<1)"ZEICHNEN VON WINKEL WU" = PRINTTflEQ >"BIS WINKEL WO C0RRDMRSS)" 

820 I NPUT"XM, VM, HX, HV, HU, WQ=" i XM, VM, HX, HV, WU, WO ■■ GOSUB300O0 : GOTO50080 

890 REM *************************** 

891 REM * flUFRUFPROGRAMM FUER * 

892 REM * ELLIPSE LOESCHEN * 

893 REM *************************** 

9O0 PRINT"SELLIPSEB MIT MITTELPUNKT <XM.VM>,"=PRINTTAB<1>"HALBMESSERN HX UND HV" 
910 PRINTTRBCl)"LOESCHEN VON WINKEL WU"•PRINTTABC1)"BIS WINKEL WO CGRflDMASS)" 
320 INPUT"XM,VM,HX,HV,WU,WO“*,XM,VM,HX,HV,WU,WO•GOSUB58000=GOTO50090 

990 REM *************************** 

991 REM * flUFRUFPROGRAMM FUER * 

992 REM * DEMONSTRATION * 

993 REM *************************** 

1000 GQSUB50030 • F‘RINTCIHRT< 14?> = FORI-1TO10 = PRI.NTCHR$< 17) i ■ HEXTI 

1010 PRINTTflB<8>"BITTE ETWAS GEDULD" ; PRINTTRB<5)"DIE BIT-MAP WIRD GELOESCHT" 

1020 GOSÜB50010 = PRINTTHBO? "UND MIT FARBE VERSEHEN" : FORI = 1 TO1800 : NEXTI 
1030 F1=7 : F2=6:GOSUB50000 GQSUB50020:FORI=1TO500■HEXT:GOSUB50030 
1040 PRINTCHR*<147) : FORI = 1 TOI0 : PRINTCHR*< 17); '• NEXTI 
1050 PRINTTABCSÜ"ZEICHNEN VON STRECKEN":FORI=1TO500:HEXTI 
1OSO GQSUB50000:FORl=0TO12 

1070 X1=30+1*1 0 ; VI=180-1*14.1?:X£=l50+1*13.3'V2=10+1*14.583 

1080 GOSUB50060:NEXTI=FORK=0TO9:F1=K'F2=K+1:GOSUB50020'FORJ=1T0588■NEXTJ : NEXTK 
1090 GOSUB50030:PRINT PRINTTABCSr 1 STRECKEN LOESCHEN" 

1100 FORI = 1TO500'NEXTI:GOSUB50000 : X1=30 = V1 = 180:X2=150:V2=10 -GOSUB50870 

1110 X1=310 : V1=185 : GOSUB50070 : FOR1=1TO500:HEXT I:GOSUB50030 

1120 PR INT :RRINTTflB<5> "ELLIPSEN ZEICHNEN" ' FORI“ 1T0508 : HEXTI. ' GOSUB50000 

1130 XM-170 : VM=I50 

1 HO FORI=0TO1S:WU«3 *90 : WO=MU+90 

11.50 HX=20+0*INT( <3+I)/4> • HV=t0+8*INT<<2+1 V4> 

1160 GOSUB50030:HEXT I:X1=0:V1=0:X2=319:V2=@:OOSUB50060 

1170 X£=»0 : ','2=193 : GOSUB50060 ' Xl=319: Vl=199 : GOSUB50O60 ' X2=319 : V2=0 : GOSUB500S0 
1180 Xl=108•V1=0:X2=100'Y2-39'6OSUB50060'X1=0'V1=80 GOSUB50060 
1190 FORX=0TO100 V=40+25*SIN<X.-' 15> : OOSUB50O4O : NEXTX 
1200 X1=219:v1=0 X2=219:V2=30:OOSUB30060:X1=31 3 V1=80:GOSUB50060 
1210 XM=243: Vi1=40 • HX=20 • HY=3@ '• WU=0: «0=368 • GOSUB58089 

1220 X!=279 V1 1O:X2=279'V2=70:G0SUB50Ü60 V1=40 X2-209 V2=10 GQSUB50060 


1230 V2=70 GOSUB50060 
£000 RETURM 


Listing 3. Grafik-Test und Demonstration 


360 ist. Der Kreis ist ein Sonderfall 
der Ellipse. Dann muß nur HX = HY 
sein. 

Für mathematisch Interessierte: 
Es werden die Parametergleichun¬ 
gen der Ellipse verwendet: 

X = XM + HX*COS(WB) und 
Y=YM + HX* SIN(WB) 

Auch hier gibt es keine Einschrän¬ 
kung wie beim Strecken-Zeichnen 
in der Größe von XM, YM, HX, WU, 
WO. 

W ist eine Laufvariable (ein Win¬ 
kel) der in WB (gleicher Winkel im 
Bogenmaß) umgerechnet wird. L ist 
wieder die Löschmarke. 

▼ Ellipse löschen 

Bis auf das Setzen der Löschmar¬ 
ke gilt dasselbe wie für das Zeich¬ 
nen der Ellipse. 

▼ Kombination 

Erfordert schon definierte Farb- 
kennzahlen Fl und F2 (siehe Farb¬ 
gebung) und schaltet dann die 
Hochauflösung an, löscht die Bit- 
Map und sorgt für die Farbe. 

Soweit die Unterprogramme in Li¬ 
sting 2. 


Ein Beispiel für die 
Möglichkeiten der 
Grafik-Bibliothek 


Als ein Beispiel für die Möglich¬ 
keiten der Unterprogramm- 
Sammlung habe ich (ohne nun be¬ 
sonders auf Schönheit zu achten — 
das sind Sie ja von mir schon ge¬ 
wohnt), noch ein Hauptprogramm' 
angefügt, mit dem Sie etwas herum¬ 
probieren können (Listing 3). Das Li¬ 
sting ist ausführlich kommentiert, so 
daß hier nur wenige Erläuterungen 
folgen müssen. 

Beim Eintippen müssen Sie für ei¬ 
nige Zeilen die Abkürzungen (siehe 
Handbuch Seite 130 ff) der Basic- 
Befehle eingeben, da die Zeilen 
sonst länger als 80 Zeichen werden. 

Nach »RUN« sehen Sie ein Menü, 
das alle Möglichkeiten der Grafik- 
Unterprogramme ansteuert. Die 
Optionen 8 (Strecke zeichnen) bis B 
(Ellipse löschen) sowie 4 (Farbge¬ 
bung) und 5 (Kombinationen) erfor¬ 
dern Eingaben. Es ist daher sinnvoll, 
diese Optionen nur im Normalmo¬ 
dus anzuwählen. Der Normalmodus 
ist immer dann zu erreichen, wenn 
Zeichenoperationen im Hochauflö¬ 
sungsmodus abgeschlossen sind. 

Fortsetzung auf Seite 178 
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Der VC 20 und der C 64 
werden gerne als Spielzeug abgetan. 
Der Gegenbeweis liegt vor. 
Im Institut für Physiologische 
Chemie in München 
wurden fünf Commodore 
bei Untersuchungen im Labor 

eingesetzt. 


sechsten Semester, näht an einem 
pulsierenden Rattenherz. 

Während der ganzen Zeit steht 
Franz M. Zwiebel schmunzelnd in ei¬ 
ner Ecke des Labors. Er kennt die 
erstaunten und neugierigen Blicke 
der Outsider. Für ihn ist es Arbeits¬ 
alltag, was hier passiert. Wieder 
draußen auf dem Flur erklärt er: 
»Wir untersuchen Stoffwechselvor- 
gänge an intakten Tier-Organen. Es 
ist der beste Weg, verläßliche Anga¬ 
ben über den menschlichen Stoff¬ 
wechsel zu bekommen. Reagenz¬ 
glasforschung bringt da nichts. Was 
Sie eben gesehen haben, ist ein iso¬ 
liertes Rattenherz, das über einen 
künstlichen Kreislauf am Leben er¬ 
halten wird.« Aha, das leichte Schau¬ 
dern vorhin war also berechtigt. 
Und die Schläuche mit der Flüssig- 


G ekachelte Wände, kalter Stein¬ 
fußboden, Neonlicht, auf dem 
großen, grauen Arbeitstisch in 
der Mitte des Raumes ein Gewirr 
von Plastikschläuchen, an Stahlstan¬ 
gen aufgehängt. Große und kleine 
Plastikflaschen — etwas abseits 
Meßinstrumente und ein VC 20. Der 
erste Eindruck: steril und kompli¬ 
ziert — dennoch, der Blick durch die 
Glastür in dieses Labor der Abtei¬ 
lung Stoffwechselregulation des In¬ 
stituts für Physiologische Chemie an 
der Um München erweckt Neugier. 

Franz M. Zwiebel, einer der wis¬ 
senschaftlichen Mitarbeiter, öffnet 
einladend die Tür. Drei Schritte bis 
zu dem dominierenden Schlauchla¬ 
byrinth, und es wird noch rätselhaf¬ 


ter: In den Schläuchen pulsiert eine 
klare Flüssigkeit. An dem Tisch sitzt 
ein junger Mann. Er könnte be¬ 
stimmt erklären, was sich in dem 
Schlauchwirrwarr abspielt, wozu 
dieser Laboraufbau dient. Doch sei¬ 
ne hochkonzentrierte Miene läßt 
keine Frage zu. Offensichtlich hat er 
überhaupt nicht bemerkt, daß je¬ 
mand hereingekommen ist. Gedul¬ 
dig und präzise näht er an einem 
kleinen roten ovalen Etwas, das gut 
ausgeleuchtet im Scheinwerferlicht 
vor ihm an den Schläuchen baumelt. 
Es pulsiert rhythmisch. Erste Asso¬ 
ziation: ein rohes Stückchen Fleisch 
— nichts für jemanden mit schwa¬ 
chen Nerven. Der junge Mann, Tho¬ 
mas Kapsner, Medizinstudent im 
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dann den Motor neu reguliert hatte, 
war oftmals schon zu viel Zeit ver¬ 
gangen. Eine Reihe von Untersu¬ 
chungen brauchten erst gar nicht 
ausgewertet zu werden — die Arbei¬ 
ten waren aufgrund der zu langen 
Verzögerungen wertlos.« 

In emem anderen Labor läuft ge¬ 
rade ein Versuch mit einer Ratten- 


keit stellen den künstlichen Kreis¬ 
lauf dar. Franz M. Zwiebel fährt fort: 
»Unsere Abteilung erforscht Stoff¬ 
wechselvorgänge in der Zelle und 
den Transport von Stoffen über die 
Zellmembran. Das hört sich sehr 
kompliziert an, aber im Grunde ge¬ 
nommen geht es darum, Wirkungen 
von Hormonen, anderen körperei¬ 
genen Stoffen sowie Medikamenten 
auf die Spur zu kommen.« 

Der VC 20 regelt den 
Kreislauf 

Das klingt alles recht einleuch¬ 
tend, doch was soll der Commodore 
dabei? Franz Zwiebel schien die 
Frage erraten zu haben: »Der VC 20 
ist für uns ein unentbehrlicher Hel¬ 
fer geworden. Er regelt den künsüi- 
chen Kreislauf bei unseren Experi¬ 
menten. Nehmen wir als Beispiel 
das Herz. In einem lebenden Orga¬ 
nismus pumpt ein Herz—je nach Be¬ 
lastung — unterschiedliche Blut¬ 
mengen pro Zeiteinheit durch das 
Gefäßsystem. Dasselbe geschieht 
auch bei dem isolierten Herz: Mal 
kontrahiert der Muskel mehr, mal 
weniger. Folge ist, daß nicht zu je¬ 
dem Zeitpunkt eine konstante Men¬ 
ge der Flüssigkeit aufgenommen 
und abgegeben wird. Dieser Flüs¬ 
sigkeit wollen wir eine bestimmte 
Konzentration des interessierenden 
Stoffes zusetzen, Um genaue Ergeb¬ 
nisse zu bekommen, muß die zuge¬ 
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pumpte Menge der Durchflußge¬ 
schwindigkeit angepaßt werden. 
Schwankungen, die das lebende 
Organ bewirkt, sind über den 
Schrittmotor der Infusionspumpen 
zu regulieren. Und diese Regulation 
übernimmt der VC 20 für uns. Über 
eine Meßeinrichtung nimmt er die 
Menge der Flüssigkeit pro Zeitein¬ 
heit auf und bei Abweichungen vom 
Sollwert weist er den Schrittmotor 
an, schneller oder langsamer zu ar¬ 
beiten.« 

Ohne Computer geht 
nichts 

Diese Erklärung vermittelt den 
Eindruck: Ohne Computersteue¬ 
rung können die Stoffwechsel- 
Untersuchungen überhaupt nicht 
durchgeführt werden. Franz M. 
Zwiebel bestätigt: »Vorher wurden 
die Werte gemessen, Abweichun¬ 
gen sowie die notwendigen Neuein¬ 
stellungen des Schrittmotors wur¬ 
den mit Papier und Bleistift errech¬ 
net. Es war schon eine Revolution, 
als dafür ein Taschenrechner her¬ 
genommen werden konnte. Aber 
trotzdem, ehe man addiert, subtra¬ 
hiert, dividiert, multipliziert und 


Leber. Auch hier wieder der be¬ 
kannte Versuchsaufbau: Computer 
Schrittmotor, künstlicher Kreislauf. 
Mit höchster Aufmerksamkeit per¬ 
fundiert die medizinisch-technische 
Assistentin Ursula Schwabe das 
Tier-Organ; das heißt in genau aus¬ 
geklügelten Zeitabständen spritzt 
sie Hormone ein. 

Hier im Institut für Physiologische 
Chemie werden Grundlagen des 
Stoffwechsels erforscht. Sie sind 
Voraussetzung für weitere medizini¬ 
sche Forschungsprojekte. Es kann 
oft Jahre dauern, bis ein Patient von 
diesen Erkenntnissen profitiert. 

Einer ist zu wenig 

Ein Computer ist nur em Tropfen 
auf den heißen Stein — nach diesem 
Motto schafften sich die Münchner 
gleich eine ganze Handvoll dieser 
Helfer für ihre Abteilung an. Alle ge¬ 
hören der Großfamilie Commodore 
an: zwei VC 20, ein C 64, ein 64 SX 
und ein cbm 8032. Auf den Ge¬ 
schmack ist man vor drei Jahren ge¬ 
kommen — kurz nach dem Erschei¬ 
nen des VC 20 auf dem deutschen 
Markt wurde er gekauft. Die Aus¬ 
stattung war damals sehr mager: 5 
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KByte Arbeitsspeicher, Erst ein Jahr 
später gab es dann das dringend 
notwendige Zubehör: Speicherer- 
weiterung, Drucker, Laufwerke. Die 
Software schrieb Franz M. Zwiebel 






zum großen Teil selbst. Die Compu¬ 
ter bewährten sich schnell. Ein Com- 
modore kann nicht nur einen (künst¬ 
lichen) Kreislauf zuverlässig regu¬ 
lieren, sondern er ist auch ein vor¬ 
trefflicher »Rechenkünstler« und ge¬ 
duldiger Datenschlucker. Denn zur 
Auswertung der Daten, die bei den 


oftmals sehr langfristig angelegten 
Versuchen anfallen, wird er eben¬ 
falls herangezogen. 

Franz M. Zwiebel schildert einen 
typischen Versuch: »Bei Untersu¬ 
chungen von schnellen Transport¬ 
vorgängen über die Zellmembran 
werden die Rohdaten wesentlich 
durch drei Faktoren mitbestimmt. 
Da ist die Größe des Gefäßraums 
und dessen Verzweigungen zu nen¬ 
nen sowie die Anzahl der Zellen. 
Wir brauchen aber unbedingt »sau¬ 
bere« Werte, die auch auf andere als 
die untersuchten Organe übertrag¬ 
bar sind. Es nützt nichts, zu wissen, 
wie schnell zum Beispiel Milchsäure 
im Stoffwechsel einer Versuchs- 
Leber verarbeitet wird, wenn man 
nicht gleichzeitig Angaben über 
den Gefäßraum und die übrigen 
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beiden Faktoren machen kann. Des¬ 
halb geben wir bei jedem Versuch 
sogenannte Markierungstoffe in das 
zu untersuchende Organ, die ent¬ 
sprechende Rückschlüsse zulassen. 
Eine Substanz zur Markierung des 


medizinischen Sprachgerauch Sac¬ 
charose. Dieser Stoff geht nicht in 
die Zellen, nur in den Gefäß-Raum. 
Als Markierung für die Anzahl und 
Größe der Zellen nehmen wir Harn¬ 
stoff. Er dringt in die ganze Leber 
ein. Die Werte für die interessieren¬ 
de Substanz, Milchsäure liegen zwi¬ 
schen den Werten für Saccharose 
und Harnstoff. Die Interpretation, 
wie schnell die Milchsäure in der 
Leber verarbeitet wird, können wir 
nur in Relation zu diesen Markie¬ 
rungsdaten vornehmen.« 

Der Datenanfall pro Versuch ist 
enorm: bis zu 6000 Daten müssen in 
einigen Fällen verrechnet werden. 
Mit den Mikros lassen sich die not¬ 
wendigen Umrechnungen der Roh¬ 
daten und die grafische Darstellung 
vornehmen. Werden umfangreiche¬ 


re Matrizen- oder Vektorrechnun¬ 
gen gefordert, ist der Commodore 
nicht mehr zuständig — dann läßt 
Franz M. Zwiebel die Daten auf dem 
Großrechner im Leibmtz-Rechen- 
zentrum auswerten. Doch auch 
dann braucht er einen der Klein¬ 
computer; Der Datentransfer geht 
über Lochstreifen oder Modem an 
das Rechenzentrum. 

Auch bei der Ausbildung 
hilft der Computer 

Regulation des künstlichen Kreis¬ 
laufs während eines Versuchs, Aus¬ 
wertung der Daten nach dem Expe¬ 
riment — das sind längst nicht alle 
Einsatzgebiete der fünf Commo- 
dore-Computer. Franz M. Zwiebel 
verlangt noch ein bißchen mehr: So 
hat er Berichte- und sonstige Texte 
auf der Diskette abgespeichert. Die 
Schreibmaschine als »Textverarbei¬ 
tungssystem« hat längst ausgedient. 

Die Ausbildung von Studenten ist 
eine weitere Aufgabe, die zum Ar¬ 
beitsalltag des eifrigen Münchner 
Forscherteams gehört. Und auch 
hier hat Franz M. Zwiebel ein sinn¬ 
volles Einsatzgebiet für seine Com¬ 
puter gefunden. Bei der Organisa¬ 
tion des Unterrichts, der Vorberei¬ 
tung und Auswertung von Prüfungs¬ 
aufgaben hilft ihm ebenfalls die 
Commodore-Familie. 

Wunschlos glücklich ist Franz M. 
Zwiebel aber noch nicht. Er »bastelt« 
an einer Vernetzung der Computer. 
Die Materie ist ihm inzwischen hin¬ 
reichend vertraut — wer sich beruf¬ 
lich so viel mit Mikrocomputern be¬ 
schäftigt will »der Sache auch auf 
den Grund gehen«. »Denn alles wird 
einfacher« prophezeit Franz M. 
Zwiebel, »wenn der VC 20 und der C 
64 auf dieselben Datenbestände zu¬ 
greifen können«. (kg) 
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Leber-Gefäßraums ist Zucker, im 


F-«_ll_s S'-S.TE: X I C vom ? . 1 £ . 83 nusSewertet am 28.2.34 

ERGEBNX SPROTOKOI_I_ 

BLATT 2 


LFD.NR. 

ZEIT 

(sec) 

14C— 

-SflCCHRROSE 
< dp m/50 u.1 > 

140- 

—HARNSTOFF 
<dPro/50 ul > 

3H-LRCTRT 

S^GR 

<dP ki/ 50 ul > 

T OH 

onuna^ 

< dpm/50 ul > 

3H-GLUCC 

< dP m/50 

PULS C 







1 

0.5 

0 

0 

0 

0 

0 

2 

1 

0 

0 

0 

0 

•0 

3 

1 .5 

0 

0 

0 

0 

0 

4 

2 

0.281 

0 

0 

© 

0 

5 

2.5 

2.96 

0 

0 

0 

0 

6 

3 

10.2 

13.5 

2.08 

0 

0 

7 

3.5 

19.3 

45.9 

4.49 

0 

0 

8 

4 

17.0 

12.5 

13.2 

0 

0 

9 

4.5 

189 

91 .2 

79.0 

3.06 

0 

10 

5 

493 

145 

220 

9.99 

0 


Teil einer Auswertung aus der Versuchsreihe »Puls«. Die Werte in Spalte 3 bis 7 sind Anzeichen da¬ 
für, welcher Anteil der Substanz zu der angegebenen Zeit (Spalte2) austritt. 


















50 

REM 

*************-******************* 

1060 

POKEVIC+37,B:REM MCO=ORANGE 

52 

REM 

*** 

SPRITE WETTBEWERB 

*-#* 

1070 

POKEVIC+38,2:REM MC1=R0T 

54 

REM 


.RALPH MEYER 

**■* 

1075 

POKEVIC+1,100:NR=1 

56 

REM 


STOERTEBEKERWEG 32 

*** 

1500 

• 

58 

REM 

*** 

2104 HAMBURG 92 

■#** 

2000 

REM *** SPRITE BEWEGEN VON 

60 

REM 

*************-*********-********** 

2002 

REM *** LINKS NACH RECHTS 

70 

REM 




2008 

: 

72 

REM 




2010 

PR INT "Li" 

75 

: 




2020 

FORX=1T0255STEP2 

80 

REM 

*** 

DATA EINLESEN *** 


2030 

POKEVIC+0,X 

90 

: 




2040 

P0KE2O40,250+SN(NR) 


lOO FORI=OTG4 
110 FGRJ=0T062 

120 :READBY:P0KE250*64+64*I+J,BY 
130 NEXTJ,I 

210 F0RI=1T0B:READSN(I);NEXTI 
300 : 

lOOO REM *** SPRITE PARAMETER SETZEN ** 
1005 : 

1010 VIC=5324G 

1020 POKEVIC+32,11:POKEVIC+33,11 
1030 POKEVIC+21, 1:REM SPRITE 0 AN 
1040 POKEVIC+2B,1:REM MÜLTICOLOR SPR 
1050 POKEVIC+39,0: REM SC=SCHWARZ 


2050 NR=NR+1 

2060 IFNR>BTHENNR=1 

2070 F0RI=lTO50:NEXT 

2080 NEXTX 

2999 END 

4000 : 

5000 REM *** DATEN FUER DIE 5 BEWEGUNGS 
5002 REM *** PHASEN DER FIGUR 
5004 s 

9900 REM *** SPRITE 0 

9940 DATA 2, 34, 0, 10, 168, O, 34, 14B, O 
7'jO DATA 2, 89, 64, 10, 85, BO, 8, 69, 64 
9960 DATA 34, 64, O, O, 85, O, 3, 245, 64 




\l\e\e use L n 

hx »tr 

s^ eS - 


# 

'jt 


Peter Nick, 
6540 Simmem 


(Pumucld) 


S ie können sich vorstellen, 
daß uns eine Entschei¬ 
dung nicht leichtgefallen ist. 
Denn es haben sich viele Le¬ 
ser an diesem Wettbewerb 
beteiligt und ein Sprite sah 
schöner aus als das andere. 
Schließlich mußte sich jeder 

Redakteur vor den Monitor 


Torsten Ludwig, 
2857 Sievern 


(Fuchs) 



und kam deshalb auf den 
zweiten Platz. Multicolor 
Sprites haben zwar den 
Nachteil, daß die Auflösung 
des Sprites geringer ist, es 
wird gröber, aber es ist et¬ 
was schwieriger zu program¬ 
mieren. 


Alexander Glaser, 6113 Babenhausen 



(Raupe) 


setzen und zu jedem Sprite 
seine eigene Beurteilung ab¬ 
geben. Zum Schluß wurden 
die Beurteilungen ausge¬ 
wertet, dann stand der Sie¬ 
ger fest. Das Multicolor 
Sprite von Ralph Meyer aus 
Hamburg bekam die mei¬ 
sten Stimmen. Es ist eines der 
wenigen Sprites, die in Multi¬ 
color erstellt wurden und 
sieht doch recht hübsch aus. 


Wenn Sie das beistehende 
Listing abtippen und das Pro¬ 
gramm starten, bemerken 
Sie auch die Liebe fürs De¬ 
tail, die in jeder Bewegung 
des kleinen Männchens 
steckt. 

Ähnliches gilt auch für das 
Motorrad, das Erwin Schaal 
aus Auenwald schickte. Nur 
ist es kein Multicolor-Sprite 

Joachim 
Goebd, 
6203 
Hochheim 


(Cowboy) 




Thomas Reuter, 7742 St. Georgen/Schw. 
(Enduro) 



& 
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Das schönste 



1. Preis: Ralph Meyer, 2104 Hamburg 


9970 DATA 43, 184, 0, 191, 191, 208, 255, 239 
, 212 

9980 DATA 95, 250, 148, 67, 252, 0, O, 168, 0 
9990 DATA 34, 170, 0, 42, 1B6, 128, 42, 226, 
128 

10005 DATA 170, 2, 128, 160, 2, 160, 128, 0, 
168 

11000 REM *** SPRITE 1 

11010 DATA 34, 40, 128, 8, 170, 0, 10, 148, 0 
11020 DATA 170, 153, 64, 10, 85, 80, 8, 85, 6 
4 

11030 DATA 42, 64, 0, 12B, 85, 0, 3, 245, 64 
11040 DATA 3, 252, 0, 3, 236, 0, 31, 190, 20B 
11050 DATA 94, 255, 208, 67, 252, 0, 0, 168, 

0 

11060 DATA 0, 168, 0, 10, 170, 0, 170, 10, 12 
8 

11070 DATA 16S, 2* 136, 160, 2, 160, 160, 0, 
160 

12000 REM *** SPRITE 2 

12010 DATA 34, 34, 0, 10, 168, 0, 10, 148, 0 
12020 DATA 42, 89, 64, 10, 85, 80, 40, 69, 64 
12030 DATA 10, 64, 0, 32, 85, 0, 3, 245, 64 
12040 DATA 3, 232, 0, 3, 236, 0, 7, 188, 0 


12050 

12060 

12070 

13000 

13010 

13020 

13030 

13040 

13050 

13060 

13070 

14000 

14010 

14020 

4 

14030 

14040 

14050 

14060 

14070 

20000 

20100 

READY. 


DATA 23, 189, 0, 22, 253, 0, 0, 168, O 
DATA 2, 168, 0, IO, 168, 0, 10, 42, O 
DATA B, 10, O, 10, 10, O, 10, 138, 128 
REM *** SPRITE 3 

DATA O, 138, 0, 10, 168, 0, 42, 148, 0 
DATA 10, 89, 64, 10, 85, 80, 8, 69, 64 
DATA 34, 64, O, 8, 85, O, 3, 245, 64 
DATA 15, 184, 0, 59, 188, O, 63, 237, 0 
DATA 15, 237, 64, 7, 249, 64, 2, 160, 0 
DATA 2, 168, 0, 10, 168, 0, 10, 42, 0 
DATA 8, 10, O, 10, 10, O, 10, 138, 128 
REM *** SPRITE 4 

DATA 2, 34, O, 10, 168, O, 138, 148, O 
DATA 42, 153, 64, 10, 85, 80, 40, 85, 6 

DATA 138, 64, O, 32, 69, O, 3, 245, 64 
DATA 3, 188, 0, 3, 188, O, 3, 188, O 
DATA 3, 156, 0, 3, 212, 0, 0, 148, O 
DATA O, 168, 0, O, 168, O, 0, 40, O 
DATA O, 40, O, O, 168, O, O, 170, O 
REM *** REIHENFOLGE *** 

DATA 0,3,4,2,1,2,4,3 


Auf eine ganz andere Idee 
kam Stefan Hübner aus Han¬ 
nover. Die an sich langweili¬ 
ge Computerschrift läßt sich 
mit seinem Sprite sehr gut 
verzieren. Etwa als Anfangs¬ 
buchstabe eines Absatzes. 



Das verzierte »G» von Gan- 
dalf aus dem »Hobbit» brach¬ 
te ihm den dritten Platz ein. 


Salomonisches 

Urteil 

Als wir begannen, die Le¬ 
sereinsendungen zu prüfen 
und zu bewerten, merkten 


wir, daß es fast unmöglich 
sein würde, einen Sieger zu 
erhalten, dessen Sprite als 
einziges den Gesamtpreis 
von 1000 Mark rechtfertigen 
würde. Zu gering waren die 
Unterschiede. Deshalb ent¬ 
schieden wir uns für eine ge¬ 
rechtere Verteiluna des 
Gesamtpreises. Der Sieger 
erhält 350 Mark, der zweite 
Platz, das Motorrad, fährt mit 
200 Mark nach Hause und 
das hübsche »G« wird mit 100 
Mark honoriert. Da die restli¬ 
chen Sprites unserer TOP- 
TEN auch sehr hübsch sind 
und auch nicht wesentlich 
schlechter ausfallen, be¬ 


schlossen wir, jedem von ih¬ 
nen eine Prämie von je 50 
Mark zukommen zu lassen. 



Martin 
Kronbuegel, 
Hamburg 92 


(Segelschiff) 



nicht aus einem, sondern aus 
mehreren Sprites. Deshalb 
kamen sie auch nicht unter 
die ersten drei Gewinner. 
Wir hoffen, daß die Leser 
und auch die Gewinner mit 
dieser »salomonischen« Re¬ 
gelung einverstanden sind. 

(Die 64'er Redaktion) 



Dem aufmerksamen Beob¬ 
achter wird auffallen, daß 
zwei der abgebildeten Spri¬ 
tes sich von allen anderen 
unterscheiden. Und zwar 
sind das der Pumuckl und 
der Supermann. Diese Spri¬ 
tes sehen zwar sehr schön 
aus, bestehen aber leider 


2. Preis: Erwin Schaal,7159 Auenwald (Motorrad) 
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Mor-onllnu. 






























































































































































VC 20/C 64 


Programmierwettbewerb 



Algorithmus aus dem 64’er/ 
4), Unterprogramme für Bild¬ 
schirmaufbau, Foimatie- 
rungshilfen (Print Using oder 
Print At, Maskenaufbaupro¬ 
gramme, etc.), Sortierrouti¬ 
nen. Programme zur Anpas¬ 


Nachdem wir ein Magazin 
speziell für die Commodore- 
Computer geschaffen ha¬ 
ben, rückt ein Wunschtraum 
in greifbare Nähe: 

Wir wollen eine Programm¬ 
bibliothek aufbauen. Eine Bi¬ 
bliothek, zu der jeder Leser 
einen (oder auch beliebig 
viele) Beiträge leisten kann. 

Warum eine Bibliothek? 

In fast jeder Computerzeit¬ 
schrift werden irgendwann 
einmal kleine Programme, 
Utilities, abgedruckt, die je¬ 
der Programmierer sehr gut 
brauchen kann. Aber wer 
kann sich schon jede Zeit¬ 
schrift jeden Monat leisten. 
Und nicht jeder hat die Zeit, 
jedes eigentlich interessante 
Programm abzutippen. Des¬ 
halb wollen wir eine Samm¬ 
lung von Unterprogrammen 
zusammenstellen, die jedem 
Leser zur Verfügung steht. 

Was soll die Bibliothek enthalten? 

Sie soll hauptsächlich Pro¬ 
gramme enthalten die man 
entweder in bestehende Pro¬ 
gramme einsetzt oder von 
Anfang an in ein zu ent¬ 
wickelndes Programm ein¬ 
baut. 

Dazu gehören zum Beispiel: 
Druckerhilfsprogramme, wie 
Hardcopy-Routinen, Unter¬ 
programme für Plotter, Gra¬ 
fik-Unterprogramme (wie 
zum Beispiel der Draw-line 


sung bestimmter Peripherie 
an den Computer (zum Bei¬ 
spiel Epson an C 64) 

Auch Utilities, wie etwa Re- 
number, Merge, Delete oder 
Copy finden ihren Platz. An¬ 
sonsten sind Ihrer Fantasie 
keine Grenzen gesetzt. Ma¬ 
chen Sie Vorschläge. Es sol¬ 
len die Leser, also Sie sein, 
die die Bibliothek aufbauen. 
Um diese Bibliothek aufbau¬ 
en zu können, müssen je¬ 
doch einige Regeln beachtet 
werden. 

Ein Problem: die Variablen 

Diese Unterprogramme 
sollen von jedem eingesetzt 
werden können, und das 
ohne allzugroßen Ände¬ 
rungsaufwand. Ein Problem 
dabei sind die verwendeten 
Variablen. Wenn man ein Bi¬ 
bliotheksprogramm in sein 
eigenes Programm integrie¬ 
ren will, muß man sich darauf 
verlassen können, das keine 
gleichen Variablen für unter¬ 
schiedliche Zwecke benutzt 
werden. 

Deshalb bestimmen wir 
die Namen der Variablen, 
die Sie für Ihre Unterpro¬ 
gramme, die in unsere Bi¬ 
bliothek kommen sollen, be¬ 
nutzen dürfen. Die Art der 
Parameterübergabe erklä¬ 
ren wir dann später noch. 

Am besten benutzen wir in 
unseren Unterprogrammen 
sonst selten benutzte Varia¬ 
blennamen: 

Ql bis Q9 oder Q9(0) bis 
Q9(10) für numerische Varia¬ 
ble 


Yl$ bis Y9$ oder Y9$(0) bis 
Y9$(10) für String Variable 
Wl(i.j) bis W9(i,j) für numen- 

Q(- Vi CI pol H 

Vl$(i,j) bis V9$(i,j) für String 
Felder 

Als Laufvariable sollten Sie 
die sonst üblichen nehmen, 
aber in jeweils doppelter 
Ausführung: 
IIJJ,KK,LL,MM,NN 
Beispiel für Parameterübergabe 

Angenommen, es existiert 
folgendes Unterprogramm 
(siehe Listing). Dann kann 
dieses Unterprogramm 
durch das Hauptprogramm 
folgendermaßen aufgerufen 
werden: 

7120. 

7130 .... 

7140 Q1=K 

7150 GOSUB 100:REM SOR- 
1 TIEREN Ft * 

7160 ... 

An diesem Beispiel kann 
man gleich zwei Punkte er¬ 
kennen: 

1. In Zeile 7140 wird die Va¬ 
riable K an die Variable Ql 
übergeben. K und Ql haben 
jetzt also den gleichen Wert, 
nämlich die Größe des Fel¬ 
des FF$(). Nur derjenige, der 
das Unterprogramm in sein 
Programm einbauen will, 
muß wissen, welche Variable 
er übergeben muß. Denjeni¬ 
gen, der das Unterprogramm 
geschrieben hat, interessiert 
das überhaupt nicht. Der 
muß dem späteren Benutzer 
lediglich mitteilen, welche 
Variablen er benutzt und was 
sie bedeuten. 

2. Das Feld FF$(). Der Er¬ 
steller des Unterprogramms 
hat nicht den Namen FF$ ge¬ 
wählt, sondern Vl$ (gemäß 
unseren Konventionen siehe 
oben). Erst der spätere Be¬ 
nutzer hat den Namen (ge¬ 
mäß seinen Bedürfnissen) in 
FF$ umgewandelt. Und das 
aus folgendem Grund: 

Eine Parameterübergabe 
eines Feldes ist nicht nur zeit¬ 
raubend, sondern auch der 
Speicherplatz des Feldes 
muß verdoppelt werden (al¬ 
so auch neu dimensioniert 


werden). Das ist hier die be¬ 
deutendste Einschränkung 
in Basic. Aus diesem Grunde 
sollte in diesem Fall die Mög¬ 
lichkeit bestehen, das Unter¬ 
programm zu ändern (also 
bitte keinen Listschutz oder 
ähnliches einbauen). Die 
Zeilennummern sollten in 
Zehnerschritten durchnum¬ 
meriert werden. 

Aufbau des Unterprogramms 

Bitte schicken Sie Ihre Pro¬ 
gramme mit diesem Aufbau 
ein: In der obersten Zeile die 
Bezeichnung UP gefolgt vom 
Namen (im Beispiel Zeile 
110). Darunter die Überga¬ 
beparameter (130-140). 
Durch einen Strich getrennt 
folgen die im Unterpro¬ 
gramm verwendeten Varia¬ 
blen ebenfalls mit einer kur¬ 
zen Erklärung (170-180). Am 
Schluß des Programmkop¬ 
fes soll eine kurze Beschrei¬ 
bung des Programms stehen 
(200-220). Erst danach folgt 
das eigentliche Programm. 
Es sollte mit RETURN been¬ 
det werden. 

Daß zusätzlich noch eine 
ausführliche Programmbe¬ 
schreibung (Sinn und Zweck, 
Funktionsweise, Variablen¬ 
tabelle etc.) vorhanden sein 
muß, ist eigentlich selbstver¬ 
ständlich. Gerade bei Utili¬ 
ties ist eine ausführliche Be¬ 
dienungsanleitung (auch für 
Anfänger verständlich) un¬ 
bedingt notwendig! Eine gu¬ 
te Lösung ist es, diese Be¬ 
schreibungen zusätzlich in 
REM-Zeilen an das Pro¬ 
gramm anzuhängen (hinter 
dem RETURN). Man kann sie 
dann bei Bedarf einfach li¬ 
sten und auch, wenn nicht 
mehr benötigt, einfach lö¬ 
schen. 

Wir werden alle einge¬ 
schickten Programme testen 
und jeden Monat die besten 
prämieren, veröffentlichen 
und zusätzlich als Teil eines 
Programmpaketes als Leser- 
Service auf Diskette anbie¬ 
ten. Wir freuen uns über je¬ 
den Beitrag. Jeder kann ge¬ 
winnen, es werden jeden 
Monat mehrere Preise ver¬ 
geben. Und jeden Monat 
wird ihr Unterprogramm 
wieder mitberücksichtigt. 
Schicken Sie Ihre Unterpro¬ 
gramme an: Verlag Markt & 
Technik, Redaktion 64'er, 
Programmierwettbewerb: 
Programmbibliothek, Hans- 
Pinsel-Straße 2, 8013 Haar 
bei München. 
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Fortsetzung von Seite 169 


Wettbewerb 


Drücken Sie dann "2', sind Sie wie¬ 
der im normalen Rechnerbetrieb. 

Sollten Sie durch irgendeinen Um¬ 
stand (zum Beispiel durch Drücken 
der »RUN/STOP«-Taste) im Hochauf¬ 
lösungsmodus aus dem Programm 
fallen, dann hilft der folgende Weg: 

1. »SHIFT« + »CLEAR/HOME« 

2. »RUN« »RETURN« 

3. dann »2« eingeben 

Die Option »C« zeigt eine kleine 
Demonstration von Möglichkeiten 
der Grafik-Unterprogramme. Aller¬ 
dings sollten Sie ein bißchen Zeit 
mitbringen, wenn Sie C anwählen: 
Das ganze dauert zirka 25 Minuten. 

Option 6 (Punkte zeichnen) ist so 
eingerichtet, daß 320 Punkte in Form 
einer Sinus-Funktion gezeichnet 
und mit Option 7 (Punkte löschen) 
teilweise wieder gelöscht werden. 


Ausblicke - schnellere 
Grafik durch Maschinen¬ 
sprache 


Diese Folge soll nicht beendet 
werden, ohne einen kleinen tröstli¬ 
chen Ausblick. Wie Sie — beson¬ 
ders im letzten Programm — feststel¬ 
len konnten, braucht man schon eini¬ 
ges Sitzfleisch für hochauflösende 
Grafik in Basic. Wenn Sie aber ein 
kommerzielles Grafik-Programm 
laufen sehen, geht das alles erheb¬ 
lich schneller. Was ist der Unter¬ 
schied? Da wäre zunächst einmal 
die Programmiersprache: Unser 
C 64 kann eigentlich gar kein Basic. 
Er braucht den Basic-Interpreter, 
der zunächst jeden Befehl liest und 
dann in Maschinensprache über¬ 
setzt. Die versteht unser Rechner 
zwar, die Übersetzung und das Le¬ 
sen dauern jedoch lange Zeit. Eine 
starke Beschleunigung der Grafik 
ist möglich durch Programmieren in 
Maschinensprache. Einige solche 
Maschinenspracheprogramme zur 
beschleunigten Grafik werden in 
den nächsten Folgen gezeigt. Aller¬ 
dings stoßen wir da bald an die 
Grenzen unseres Commodore. Ein 
8-Bit-Computer mit zirka 1 Mega¬ 
hertz Taktfrequenz wie unser C 64 
ist beispielsweise in der 
Fließkomma-Arithmetik (wie sie für 
das Zeichnen von Ellipsen nötig ist) 
zeitlich gehandicapt, und deswegen 
sind der Geschwindigkeit bei kom¬ 
plexerer Grafik doch einige Gren¬ 
zen gesetzt. 

(Heino Ponnath) 
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Anwendung des Mo- 
was ist das? Nun, Sie 
n einen Comraodore 
einen VC 20 und 
versuchen diesen irgend¬ 
wie sinnvoll einzusetzen. 
Unter einer sinnvollen 
Anwendung versteht die 
6-1 'er Redaktion alles, was 
beispielsweise Program- 

bewirkeri. Es kann sich 
dabei um die Berech¬ 
nung der Benzinkosten 
für ihren Wagen handeln, 
uni ein eigenes Textverar- 
fe’eit nngsprogramm ge¬ 
hen, sich um die Verwal¬ 
tung Ihrer Tiefkühltruhe 
drehen oder ein ausge¬ 
klügeltes Telefon- und 
Adreßregister sein. 

Setzen Sie Ihren VC 
20/C 64 mehr oder weni¬ 
ger beruflich ein 9 Auch, 
oder vor allem, das ist ei¬ 
ne sinnvolle Anwendung. 
Sie führen die Lohn- und 
Gehaltsabrechnung, Ihre 
Lagerverwaltimg, die Be¬ 
stellungen auf einem 
Commodore-Heimcom- 
puter durch? So spezielle 
Anwendungen wie die 
Berechnung der Statik 
von selbstgezimmerten 
Regalen, von Klimadia- 
grämmen oder Vokabel¬ 
lernprogrammen für den 
Schulunterricht oder die 
Zinsberechnung bei Kre¬ 
diten sind ebenfalls The 
men, die mehr als konkur¬ 
renzfähig sind. 

Uns ist die Anwendung 
des Monats 



wert. 

shreiben Sie uns, was 
Sie mit Ihrem Computer 
machen: 

Redaktion 64’er, Aktion' 
Anwendung des Monats, 
Hans-Pinsel-Str. 2, 8013 
liaar bei München. . 
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Testbericht 
ISM 64 

ISM 64 ist ein Hilfs¬ 
programm für 
Programmierer zur 
Erstellung von 
Datei-Verwaltungspro¬ 
grammen. Für wen sich 
dieses Programm 
eignet, was man bei 
der Programmierung 
beachten muß und was 
es leistet, ist in einem 
mehrmonatigen Test 
festgestellt worden. 


EPROM-Brenner 


Sind EPROMs eine Alternative 
zum Floppy-Laufwerk? Was EPROM- 
Brenner leisten, was sie kosten und 
wie man mit ihnen umgeht, haben 
wir getestet. 




Das Diskettenlaufwerk VC 1541 durchleuchtet 



Wie sieht das 
Floppy-Laufwerk 
von innen aus, 
wie funktioniert 
überhaupt ein 
Floppy-Laufwerk 
und wie kann 
man eventuell 
anfallende 
Reparaturen 
selbst erledigen? 
Auf dieseund noch 
weitere Fragen 
werden wir 
versuchen eine 
Antwort zu geben. 



Modem 

und Akustikkoppler 

Welche Akustikkoppler und Mo-' 
dem auf dem deutschen Markt er¬ 
hältlich sind, ob sie von der Post 
zugelassen sind und was sie ko¬ 
sten, wird Ihnen unsere Markt¬ 
übersicht zeigen. Außerdem wer¬ 
den einige neue Akustikkoppler 
getestet. 

Paint Magic 

Bilder malen im Computerzeital¬ 
ter: Der Bildschirm ersetzt die Lein¬ 
wand, der Joystick den Pinsel und 
die Tastatur die Farbpalette. Wir ha¬ 
ben eines der eindrucksvollsten 
Mal- und Zeichenprogramme gete¬ 
stet. Wie ist die Handhabung, wel¬ 
che Qualität hat die Bildschirmdar¬ 
stellung, sind Vorkenntnisse im 
Zeichnen erforderlich? Unser aus¬ 
führlicher Bericht zeigt die vielfälti¬ 
gen kreativen Möglichkeiten, die 
sich mit »Paint Magic« auftun. 

Der VC 20-Videochip 

Im VC 20 steckt doch mehr, als das 
Handbuch zugeben will. Wir zeigen 
nicht nur, wie man hochauflösende 
Grafik programmiert und sich eige¬ 
ne Zeichensätze erstellt, sondern 
bringen auch Anregungen, um an¬ 
dere wenig bekannte Eigenschaften 
des VIC-Chips zu nutzen. Erstellen 
Sie sich zum Beispiel Ihr eigenes 
Bildschirmformat oder schalten Sie 
doch zwischen mehreren Bild¬ 
schirmbereichen hin und her. Be¬ 
sonderer Leckerbissen: Listing 
einer Grafikhilfe in Maschinen¬ 
sprache. 


Listings 


für 


— Anwendung des Monats 

Ein Fakturierungsprogramm 
Selbständige 

— Listing des Monats 

Castle of Doom — ein Abenteuer¬ 
spiel 

— Durch die Kopplung von zwei C 64 
einen fünfstimmigen Synthesizer 
realisieren 

— Programmumwandlung von den 
älteren Commodore-Computern auf 
den C 64 und umgekehrt 

— View Bam: optische Darstellung 
der Sektorenbelegung auf der Dis¬ 
kette 

Der Nachwuchs von Pacman ist 
da; Pacboy auf dem C 64 

— und natürlich wieder viele Tips 
und Tricks für den VC 20 und C 64 
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